X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/a1506d2977a8c2eb982ad0b59416009cdfaa6f51..2aa13ec4e008ea45bcc342fdbeee375724426eaf:/lisp/progmodes/delphi.el diff --git a/lisp/progmodes/delphi.el b/lisp/progmodes/delphi.el index 5f1bed7477..4ebbc54969 100644 --- a/lisp/progmodes/delphi.el +++ b/lisp/progmodes/delphi.el @@ -64,12 +64,6 @@ (provide 'delphi) -(defconst delphi-version - (let ((revision "$Revision: 3.8 $")) - (string-match ": \\([^ ]+\\)" revision) - (match-string 1 revision)) - "Version of this delphi mode.") - (eval-and-compile ;; Allow execution on pre Emacs 20 versions. (or (fboundp 'when) @@ -742,7 +736,7 @@ routine.") (delphi-step-progress p "Fontifying" delphi-fontifying-progress-step)) (delphi-progress-done))))) -(defconst delphi-ignore-changes t +(defvar delphi-ignore-changes t "Internal flag to control if the delphi-mode responds to buffer changes. Defaults to t in case the delphi-after-change function is called on a non-delphi buffer. Set to nil in a delphi buffer. To override, just do: @@ -2010,4 +2004,5 @@ no args, if that value is non-nil." (run-hooks 'delphi-mode-hook)) +;;; arch-tag: 410e192d-e9b5-4397-ad62-12340fc3fa41 ;;; delphi.el ends here