aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRay Blaak2000-02-09 07:04:15 +0000
committerRay Blaak2000-02-09 07:04:15 +0000
commite97a246146ef29f263a14cd6bd6a60a6e937618c (patch)
tree1f6fb08b03cad329ee42336889cf2bc6554b09cd
parent69da54ba20cdf44d2618acfa7ae7234ed21ace97 (diff)
downloademacs-e97a246146ef29f263a14cd6bd6a60a6e937618c.tar.gz
emacs-e97a246146ef29f263a14cd6bd6a60a6e937618c.zip
Make resourcestring a declaration region, like const and var.
-rw-r--r--lisp/progmodes/delphi.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/progmodes/delphi.el b/lisp/progmodes/delphi.el
index 930dd09f1ff..3a3153096e0 100644
--- a/lisp/progmodes/delphi.el
+++ b/lisp/progmodes/delphi.el
@@ -65,11 +65,14 @@
65(provide 'delphi) 65(provide 'delphi)
66 66
67(defconst delphi-version 67(defconst delphi-version
68 (let ((revision "$Revision: 3.2 $")) 68 (let ((revision "$Revision: 3.3 $"))
69 (string-match ": \\([^ ]+\\)" revision) 69 (string-match ": \\([^ ]+\\)" revision)
70 (match-string 1 revision)) 70 (match-string 1 revision))
71 "Version of this delphi mode.") 71 "Version of this delphi mode.")
72;;; $Log: delphi.el,v $ 72;;; $Log: delphi.el,v $
73;;; Revision 3.3 2000/02/01 14:32:21 fx
74;;; (delphi): Add :version to defgroup.
75;;;
73;;; Revision 3.2 1999/08/18 05:08:39 blaak 76;;; Revision 3.2 1999/08/18 05:08:39 blaak
74;;; checked in with -k by blaak at 1999/08/18 05:08:39 77;;; checked in with -k by blaak at 1999/08/18 05:08:39
75;;; 78;;;
@@ -276,7 +279,7 @@ are followed by an expression.")
276 `(,@delphi-end-block-statements ,@delphi-mid-block-statements) 279 `(,@delphi-end-block-statements ,@delphi-mid-block-statements)
277 "Statements that match the indentation of the parent block.") 280 "Statements that match the indentation of the parent block.")
278 281
279(defconst delphi-decl-sections '(type const var label) 282(defconst delphi-decl-sections '(type const var label resourcestring)
280 "Denotes the start of a declaration section.") 283 "Denotes the start of a declaration section.")
281 284
282(defconst delphi-class-types '(class object) 285(defconst delphi-class-types '(class object)