[Emacs-diffs] /srv/bzr/emacs/trunk r112398: * progmodes/octave.el (octave-sync-function-file-names): Fix last

[Leo Liu]

------------------------------------------------------------
revno: 112398
committer: Leo Liu <address@hidden>
branch nick: trunk
timestamp: Sat 2013-04-27 01:11:04 +0800
message:
  * progmodes/octave.el (octave-sync-function-file-names): Fix last
    change.
modified:
  lisp/progmodes/octave.el

=== modified file 'lisp/progmodes/octave.el'
--- a/lisp/progmodes/octave.el  2013-04-26 16:44:38 +0000
+++ b/lisp/progmodes/octave.el  2013-04-26 17:11:04 +0000
@@ -1024,7 +1024,8 @@
                    (file-name-nondirectory buffer-file-name)))
             (func (and (re-search-forward octave-function-header-regexp nil t)
                        (match-string 3))))
-        (when (and (not (equal file func))
+        (when (and func
+                   (not (equal file func))
                    (yes-or-no-p
                     "Function name different from file name. Fix? "))
           (replace-match file nil nil nil 3))))))