[Emacs-diffs] trunk r114528: * progmodes/octave.el (octave-send-region): Call

[Leo Liu]

------------------------------------------------------------
revno: 114528
revision-id: address@hidden
parent: address@hidden
committer: Leo Liu <address@hidden>
branch nick: trunk
timestamp: Sat 2013-10-05 10:45:24 +0800
message:
  * progmodes/octave.el (octave-send-region): Call
  compilation-forget-errors.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/progmodes/octave.el       
octavemod.el-20091113204419-o5vbwnq5f7feedwu-1028

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-10-05 02:26:39 +0000
+++ b/lisp/ChangeLog    2013-10-05 02:45:24 +0000
@@ -1,3 +1,8 @@
+2013-10-05  Leo Liu  <address@hidden>
+
+       * progmodes/octave.el (octave-send-region): Call
+       compilation-forget-errors.
+
 2013-10-05  Dmitry Gutov  <address@hidden>
 
        * progmodes/ruby-mode.el (ruby-mode): Add `ruby-mode-set-encoding'

=== modified file 'lisp/progmodes/octave.el'
--- a/lisp/progmodes/octave.el  2013-10-04 15:11:13 +0000
+++ b/lisp/progmodes/octave.el  2013-10-05 02:45:24 +0000
@@ -1471,6 +1471,8 @@
         (string (buffer-substring-no-properties beg end))
         line)
     (with-current-buffer inferior-octave-buffer
+      ;; http://lists.gnu.org/archive/html/emacs-devel/2013-10/msg00095.html
+      (compilation-forget-errors)
       (setq inferior-octave-output-list nil)
       (while (not (string-equal string ""))
         (if (string-match "\n" string)