diff options
| author | Pierre Courtieu | 2010-09-22 15:05:47 +0000 |
|---|---|---|
| committer | Pierre Courtieu | 2010-09-22 15:05:47 +0000 |
| commit | 5e8b36480ea07e5c98f4e3a4f3b4e6b5822d59ae (patch) | |
| tree | 41772a6ac2b9e35e26d201bd8a47f5c5129e13ab | |
| parent | eb6f017f823ff323570a76941e69218fbd07de8d (diff) | |
Fix bug trac 140 by writing a cleaner regexp than (proof-ids ... " ").
| -rw-r--r-- | coq/coq-syntax.el | 3 |
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)) |