diff options
| author | Glenn Morris | 2015-06-10 16:19:13 -0400 |
|---|---|---|
| committer | Glenn Morris | 2015-06-10 16:19:13 -0400 |
| commit | dfa1dc1c2b05eff6336cfac0f36c6137b4a57733 (patch) | |
| tree | febade5c22d7d9669bad8b959e7bd8998f5c63d1 /lisp/progmodes/executable.el | |
| parent | a0f0f08a521d3119ab08da3c4f1697fd67092183 (diff) | |
| download | emacs-dfa1dc1c2b05eff6336cfac0f36c6137b4a57733.tar.gz emacs-dfa1dc1c2b05eff6336cfac0f36c6137b4a57733.zip | |
* lisp/progmodes/executable.el (executable-self-display):
Use non-obsolete tail syntax. (Bug#20779)
(executable-self-display): Doc update.
Diffstat (limited to 'lisp/progmodes/executable.el')
| -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 bdc6403c316..367a2e72d74 100644 --- a/lisp/progmodes/executable.el +++ b/lisp/progmodes/executable.el | |||
| @@ -104,7 +104,7 @@ Typical values are 73 (+x) or -493 (rwxr-xr-x)." | |||
| 104 | (defvar executable-command nil) | 104 | (defvar executable-command nil) |
| 105 | 105 | ||
| 106 | (defcustom executable-self-display "tail" | 106 | (defcustom executable-self-display "tail" |
| 107 | "Command you use with argument `+2' to make text files self-display. | 107 | "Command you use with argument `-n+2' to make text files self-display. |
| 108 | Note that the like of `more' doesn't work too well under Emacs \\[shell]." | 108 | 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) |
| @@ -258,7 +258,7 @@ The magic number of such a command displays all lines but itself." | |||
| 258 | (interactive) | 258 | (interactive) |
| 259 | (if (eq this-command 'executable-self-display) | 259 | (if (eq this-command 'executable-self-display) |
| 260 | (setq this-command 'executable-set-magic)) | 260 | (setq this-command 'executable-set-magic)) |
| 261 | (executable-set-magic executable-self-display "+2")) | 261 | (executable-set-magic executable-self-display "-n+2")) |
| 262 | 262 | ||
| 263 | ;;;###autoload | 263 | ;;;###autoload |
| 264 | (defun executable-make-buffer-file-executable-if-script-p () | 264 | (defun executable-make-buffer-file-executable-if-script-p () |