From e51555082231328a974ed1f7ab6a1a658df3313b Mon Sep 17 00:00:00 2001
From: Gaëtan Gilbert
Date: Thu, 11 Oct 2018 14:45:34 +0200
Subject: Fix for coq/coq#8515 (command driven attributes)

---
 src/g_ltac2.ml4 | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src')

diff --git a/src/g_ltac2.ml4 b/src/g_ltac2.ml4
index 82ab53298e..cb42b393db 100644
--- a/src/g_ltac2.ml4
+++ b/src/g_ltac2.ml4
@@ -831,8 +831,8 @@ let classify_ltac2 = function
 
 VERNAC COMMAND FUNCTIONAL EXTEND VernacDeclareTactic2Definition
 | [ "Ltac2" ltac2_entry(e) ] => [ classify_ltac2 e ] -> [
-    fun ~atts ~st -> let open Vernacinterp in
-    Tac2entries.register_struct ?local:atts.locality e;
+    fun ~atts ~st ->
+    Tac2entries.register_struct ?local:(Attributes.only_locality atts) e;
     st
   ]
 END
-- 
cgit v1.2.3