unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
* [PATCH 1/3] octave.el: Highlight error/warning messages in inferior mode.
@ 2013-10-02 20:37 Rüdiger Sonderfeld
  0 siblings, 0 replies; only message in thread
From: Rüdiger Sonderfeld @ 2013-10-02 20:37 UTC (permalink / raw)
  To: emacs-devel; +Cc: Leo Liu

* 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 <ruediger@c-plusplus.de>
---
 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





^ permalink raw reply related	[flat|nested] only message in thread

only message in thread, other threads:[~2013-10-02 20:37 UTC | newest]

Thread overview: (only message) (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2013-10-02 20:37 [PATCH 1/3] octave.el: Highlight error/warning messages in inferior mode Rüdiger Sonderfeld

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).