diff options
author | 2004-04-14 09:31:15 +0000 | |
---|---|---|
committer | 2004-04-14 09:31:15 +0000 | |
commit | d73d4a18026209145b31516b28f4bc863adea051 (patch) | |
tree | ef20ac232c09a08658143c78e1d8e2e8bc91894d /isar | |
parent | 7b2adf1cc7384c096709f51c89eb9a519b38dab1 (diff) |
Fixes for function menu. Remove unnamed entities.
Diffstat (limited to 'isar')
-rw-r--r-- | isar/isar-syntax.el | 17 |
1 files changed, 10 insertions, 7 deletions
diff --git a/isar/isar-syntax.el b/isar/isar-syntax.el index 46224f09..a5df96a4 100644 --- a/isar/isar-syntax.el +++ b/isar/isar-syntax.el @@ -1,11 +1,12 @@ ;; isar-syntax.el Syntax expressions for Isabelle/Isar -;; Copyright (C) 1994-1998 LFCS Edinburgh. +;; Copyright (C) 1994-2004 LFCS Edinburgh. ;; License: GPL (GNU GENERAL PUBLIC LICENSE) ;; -;; Author: David Aspinall <David.Aspinall@ed.ac.uk> +;; Authors: David Aspinall <David.Aspinall@ed.ac.uk> +;; Markus Wenzel ;; Maintainer: Gerwin Klein <kleing@in.tum.de> ;; -;; isar-syntax.el,v 7.3 2003/04/15 16:06:09 da Exp +;; $Id$ ;; (require 'proof-syntax) @@ -408,11 +409,11 @@ (defconst isar-any-entity-regexp (concat "\\(?:" (isar-ids-to-regexp isar-keywords-fume) "\\)" "\\(?:\\s-*(\\s-*in.+)\\)?" - "\\(?:" isar-name-regexp "[[:=]\\)?")) + "\\(?:" isar-name-regexp "[[:=]\\)")) (defconst isar-named-entity-regexp (concat "\\(" (isar-ids-to-regexp isar-keywords-fume) "\\)" - "\\(\\s-*(\\s-*in.+)\\)?" + "\\(?:\\s-*(\\s-*in.+)\\)?" isar-name-regexp "[[:=]" )) (defconst isar-unnamed-entity-regexp @@ -420,8 +421,10 @@ (defconst isar-next-entity-regexps (list isar-any-entity-regexp - (list isar-named-entity-regexp '(1 3)) - (list isar-unnamed-entity-regexp 1))) + (list isar-named-entity-regexp '(1 2)))) +;; da: remove unnamed entities, they clutter the menu +;; NB: to add back, need ? at end of isar-any-entity-regexp +;; (list isar-unnamed-entity-regexp 1))) ;; ----- indentation |