diff options
| -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 () |