diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/progmodes/octave.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el index 3c24205eb8e..f8b9e4f6fab 100644 --- a/lisp/progmodes/octave.el +++ b/lisp/progmodes/octave.el | |||
| @@ -1024,7 +1024,8 @@ See Info node `(octave)Function Files'." | |||
| 1024 | (file-name-nondirectory buffer-file-name))) | 1024 | (file-name-nondirectory buffer-file-name))) |
| 1025 | (func (and (re-search-forward octave-function-header-regexp nil t) | 1025 | (func (and (re-search-forward octave-function-header-regexp nil t) |
| 1026 | (match-string 3)))) | 1026 | (match-string 3)))) |
| 1027 | (when (and (not (equal file func)) | 1027 | (when (and func |
| 1028 | (not (equal file func)) | ||
| 1028 | (yes-or-no-p | 1029 | (yes-or-no-p |
| 1029 | "Function name different from file name. Fix? ")) | 1030 | "Function name different from file name. Fix? ")) |
| 1030 | (replace-match file nil nil nil 3)))))) | 1031 | (replace-match file nil nil nil 3)))))) |