diff options
Diffstat (limited to 'lisp/progmodes/executable.el')
| -rw-r--r-- | lisp/progmodes/executable.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/progmodes/executable.el b/lisp/progmodes/executable.el index 367a2e72d74..50e4da93c73 100644 --- a/lisp/progmodes/executable.el +++ b/lisp/progmodes/executable.el | |||
| @@ -109,6 +109,8 @@ Note that the like of `more' doesn't work too well under Emacs \\[shell]." | |||
| 109 | :type 'string | 109 | :type 'string |
| 110 | :group 'executable) | 110 | :group 'executable) |
| 111 | 111 | ||
| 112 | (make-obsolete-variable 'executable-self-display nil "25.1" 'set) | ||
| 113 | |||
| 112 | 114 | ||
| 113 | (defvar executable-font-lock-keywords | 115 | (defvar executable-font-lock-keywords |
| 114 | '(("\\`#!.*/\\([^ \t\n]+\\)" 1 font-lock-keyword-face t)) | 116 | '(("\\`#!.*/\\([^ \t\n]+\\)" 1 font-lock-keyword-face t)) |
| @@ -251,10 +253,10 @@ executable." | |||
| 251 | 253 | ||
| 252 | 254 | ||
| 253 | 255 | ||
| 254 | ;;;###autoload | ||
| 255 | (defun executable-self-display () | 256 | (defun executable-self-display () |
| 256 | "Turn a text file into a self-displaying Un*x command. | 257 | "Turn a text file into a self-displaying Un*x command. |
| 257 | The magic number of such a command displays all lines but itself." | 258 | The magic number of such a command displays all lines but itself." |
| 259 | (declare (obsolete nil "25.1")) | ||
| 258 | (interactive) | 260 | (interactive) |
| 259 | (if (eq this-command 'executable-self-display) | 261 | (if (eq this-command 'executable-self-display) |
| 260 | (setq this-command 'executable-set-magic)) | 262 | (setq this-command 'executable-set-magic)) |