aboutsummaryrefslogtreecommitdiffhomepage
path: root/coq/coq-syntax.el
diff options
context:
space:
mode:
authorGravatar Pierre Courtieu <courtieu@lri.fr>2010-09-22 15:05:47 +0000
committerGravatar Pierre Courtieu <courtieu@lri.fr>2010-09-22 15:05:47 +0000
commit5e8b36480ea07e5c98f4e3a4f3b4e6b5822d59ae (patch)
tree41772a6ac2b9e35e26d201bd8a47f5c5129e13ab /coq/coq-syntax.el
parenteb6f017f823ff323570a76941e69218fbd07de8d (diff)
Fix bug trac 140 by writing a cleaner regexp than (proof-ids ... " ").
Diffstat (limited to 'coq/coq-syntax.el')
-rw-r--r--coq/coq-syntax.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/coq/coq-syntax.el b/coq/coq-syntax.el
index 8b095468..1b469a93 100644
--- a/coq/coq-syntax.el
+++ b/coq/coq-syntax.el
@@ -877,7 +877,8 @@ Used by `coq-goal-command-p'"
(defvar coq-id proof-id)
(defvar coq-id-shy "\\(?:\\w\\(?:\\w\\|\\s_\\)*\\)")
-(defvar coq-ids (proof-ids coq-id " "))
+; do not use proof-ids with a space separator!
+(defvar coq-ids (concat proof-id "\\(" "\\s-+" proof-id "\\)*"))
(defun coq-first-abstr-regexp (paren end)
(concat paren "\\s-*\\(" coq-ids "\\)\\s-*" end))