[PATCH 1/3] octave.el: Highlight error/warning messages in inferior mode.

[Rüdiger Sonderfeld]

* lisp/progmodes/octave.el (inferior-octave-error-face): New face.
  (inferior-octave-warning-face): New face.
  (inferior-octave-font-lock-keywords): Highlight error/warning
  messages.

Signed-off-by: Rüdiger Sonderfeld <address@hidden>
---
 lisp/progmodes/octave.el | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/lisp/progmodes/octave.el b/lisp/progmodes/octave.el
index 51cee8b..b200327 100644
--- a/lisp/progmodes/octave.el
+++ b/lisp/progmodes/octave.el
@@ -653,9 +653,21 @@ (defvar inferior-octave-mode-syntax-table
     table)
   "Syntax table in use in `inferior-octave-mode' buffers.")
 
+(defface inferior-octave-error-face '((t :inherit error))
+  "Face to use for error messages."
+  :group 'octave
+  :version "24.4")
+
+(defface inferior-octave-warning-face '((t :inherit warning))
+  "Face to use for warning messages."
+  :group 'octave
+  :version "24.4")
+
 (defvar inferior-octave-font-lock-keywords
   (list
-   (cons inferior-octave-prompt 'font-lock-type-face))
+   (cons inferior-octave-prompt 'font-lock-type-face)
+   '("^\\(?:parse \\)?error:" . 'inferior-octave-error-face)
+   '("^warning:" . 'inferior-octave-warning-face))
   ;; Could certainly do more font locking in inferior Octave ...
   "Additional expressions to highlight in Inferior Octave mode.")
 
-- 
1.8.4