diff options
| author | Gaëtan Gilbert | 2018-09-20 16:48:54 +0200 |
|---|---|---|
| committer | Gaëtan Gilbert | 2018-11-02 13:26:16 +0100 |
| commit | 8db938764d87cceee6669b339e0f995edd40fc3e (patch) | |
| tree | e82a7f9bbcdfb900ea33761cbb65a78f3d4c8e01 /plugins/ssr | |
| parent | a9f2ba45c7dba54bfd44078587fc6176a5af68d6 (diff) | |
Command driven attributes.
Commands need to request the attributes they use, with the API
encouraging them to error on unsupported attributes.
Diffstat (limited to 'plugins/ssr')
| -rw-r--r-- | plugins/ssr/ssrvernac.mlg | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/ssr/ssrvernac.mlg b/plugins/ssr/ssrvernac.mlg index 2f44624d36..2774b843aa 100644 --- a/plugins/ssr/ssrvernac.mlg +++ b/plugins/ssr/ssrvernac.mlg @@ -173,7 +173,7 @@ VERNAC COMMAND EXTEND Ssrpreneximplicits CLASSIFIED AS SIDEFF | [ "Prenex" "Implicits" ne_global_list(fl) ] -> { let open Attributes in - let locality = Locality.make_section_locality atts.locality in + let locality = Locality.make_section_locality (only_locality atts) in List.iter (declare_one_prenex_implicit locality) fl; } END |