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/firstorder | |
| 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/firstorder')
| -rw-r--r-- | plugins/firstorder/g_ground.mlg | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/firstorder/g_ground.mlg b/plugins/firstorder/g_ground.mlg index 5a4cda54b2..14a3acad57 100644 --- a/plugins/firstorder/g_ground.mlg +++ b/plugins/firstorder/g_ground.mlg @@ -76,7 +76,7 @@ VERNAC COMMAND EXTEND Firstorder_Set_Solver CLASSIFIED AS SIDEFF | [ "Set" "Firstorder" "Solver" tactic(t) ] -> { let open Attributes in set_default_solver - (Locality.make_section_locality atts.locality) + (Locality.make_section_locality (only_locality atts)) (Tacintern.glob_tactic t) } END |