diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2005-07-04 03:05:17 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2005-07-04 03:05:17 +0000 |
| commit | 67da3b400f1ab25cebb131e121404c6d8f712a2e (patch) | |
| tree | 5b15a924ad2af6b4697c658cd0a78b196151c29f | |
| parent | 99730b0e98ebba4ee91c36f946e446670657dc89 (diff) | |
| download | emacs-67da3b400f1ab25cebb131e121404c6d8f712a2e.tar.gz | |
(executable): Finish `defgroup' description with period.
(executable-set-magic): "?\ " -> "?\s".
| -rw-r--r-- | lisp/progmodes/executable.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/executable.el b/lisp/progmodes/executable.el index d278b10ba0c..3fff4c04038 100644 --- a/lisp/progmodes/executable.el +++ b/lisp/progmodes/executable.el @@ -53,7 +53,7 @@ ;;; Code: (defgroup executable nil - "Base functionality for executable interpreter scripts" + "Base functionality for executable interpreter scripts." :group 'processes) ;; This used to default to `other', but that doesn't seem to have any @@ -230,7 +230,7 @@ executable." (and (goto-char (match-beginning 1)) ;; If the line ends in a space, ;; don't offer to change it. - (not (= (char-after (1- (match-end 1))) ?\ )) + (not (= (char-after (1- (match-end 1))) ?\s)) (not (string= argument (buffer-substring (point) (match-end 1)))) (if (or (not executable-query) no-query-flag |