diff options
| author | Emilio Jesus Gallego Arias | 2020-05-17 13:45:06 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2020-05-18 12:19:58 +0200 |
| commit | 57c023fe6b5c7f97403d849f7ca618c98d1af1a4 (patch) | |
| tree | e51b9173668c8ca19193b99f6e86f9f122b1619f /plugins/ssrsearch | |
| parent | 5ec400894c62d7f73caa3f554a5c9b9ee5b8f8d6 (diff) | |
[search] [ssr] Emit deprecated message when calling search from ssreflect
but ssrsearch is not loaded.
Fixes #12338
Diffstat (limited to 'plugins/ssrsearch')
| -rw-r--r-- | plugins/ssrsearch/g_search.mlg | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/plugins/ssrsearch/g_search.mlg b/plugins/ssrsearch/g_search.mlg index 1651e1cc71..6d68cc13ab 100644 --- a/plugins/ssrsearch/g_search.mlg +++ b/plugins/ssrsearch/g_search.mlg @@ -299,6 +299,10 @@ let ssrdisplaysearch gr env t = let pr_res = pr_global gr ++ str ":" ++ spc () ++ pr_lconstr_env env Evd.empty t in Feedback.msg_notice (hov 2 pr_res ++ fnl ()) +(* Remove the warning entirely when this plugin is loaded. *) +let _ = + Ssreflect_plugin.Ssrvernac.warn_search_moved_enabled := false + let deprecated_search = CWarnings.create ~name:"deprecated-ssr-search" |