aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--doc/changelog/07-commands-and-options/11972-fix-require-in-section.rst5
-rw-r--r--vernac/vernacentries.ml7
2 files changed, 8 insertions, 4 deletions
diff --git a/doc/changelog/07-commands-and-options/11972-fix-require-in-section.rst b/doc/changelog/07-commands-and-options/11972-fix-require-in-section.rst
new file mode 100644
index 0000000000..7e34c4a0ff
--- /dev/null
+++ b/doc/changelog/07-commands-and-options/11972-fix-require-in-section.rst
@@ -0,0 +1,5 @@
+- **Changed:** The warning when using :cmd:`Require` inside a section
+ moved from the ``deprecated`` category to the ``fragile`` category,
+ because there is no plan to remove the functionality at this time.
+ (`#11972 <https://github.com/coq/coq/pull/11972>`_, by Gaëtan
+ Gilbert).
diff --git a/vernac/vernacentries.ml b/vernac/vernacentries.ml
index 106fed124e..9a1d935928 100644
--- a/vernac/vernacentries.ml
+++ b/vernac/vernacentries.ml
@@ -1081,10 +1081,9 @@ let vernac_end_segment ({v=id} as lid) =
(* Libraries *)
let warn_require_in_section =
- let name = "require-in-section" in
- let category = "deprecated" in
- CWarnings.create ~name ~category
- (fun () -> strbrk "Use of “Require” inside a section is deprecated.")
+ CWarnings.create ~name:"require-in-section" ~category:"fragile"
+ (fun () -> strbrk "Use of “Require” inside a section is fragile." ++ spc() ++
+ strbrk "It is not recommended to use this functionality in finished proof scripts.")
let vernac_require from import qidl =
if Global.sections_are_opened () then warn_require_in_section ();