[Emacs-diffs] Changes to emacs/lisp/progmodes/f90.el, v [EMACS_22_BASE]

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Glenn Morris <gm>       08/08/10 20:09:29

Index: f90.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/f90.el,v
retrieving revision 1.94.2.5
retrieving revision 1.94.2.6
diff -u -b -r1.94.2.5 -r1.94.2.6
--- f90.el      7 Jan 2008 02:10:53 -0000       1.94.2.5
+++ f90.el      10 Aug 2008 20:09:29 -0000      1.94.2.6
@@ -1234,7 +1234,7 @@
        matching-beg
       ;; Note this includes the case of an un-named main program,
       ;; in which case we go to (point-min).
-      (message "No beginning found.")
+      (if (interactive-p) (message "No beginning found."))
       nil)))
 
 (defun f90-end-of-subprogram ()
@@ -1259,7 +1259,7 @@
 ;;;    (forward-line 1)
     (if (zerop count)
        matching-end
-      (message "No end found.")
+      (if (interactive-p) (message "No end found."))
       nil)))