(semantic-grammar--lex-delim-spec): All errors should have messages.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bdec771f6e35925b275fec600ddf94a51b58b147..1cf7714e80e9f3a986f5621e4b6529492d19774d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2009-10-17  Glenn Morris  <rgm@gnu.org>
 
+       * cedet/semantic/grammar.el (semantic-grammar--lex-delim-spec):
+       All errors should have messages.
+
        * foldout.el (foldout-mouse-swallow-events):
        * gs.el (gs-load-image): Replace obsolete forms of sit-for, sleep-for.
 

diff --git a/lisp/cedet/semantic/grammar.el b/lisp/cedet/semantic/grammar.el
index 89d66582d3a9228c663fd11023cc1fe2731bf05e..f4d34def561c0b5c8a9b52b948e94bf4f862dff3 100644 (file)
--- a/lisp/cedet/semantic/grammar.el
+++ b/lisp/cedet/semantic/grammar.el
@@ -690,7 +690,7 @@ The symbols in the list are local variables in
                  (car delim-spec) (symbolp (car delim-spec))
                  (cadr delim-spec) (symbolp (cadr delim-spec)))
             delim-spec
-          (error)))
+          (error "Invalid delimiter")))
     (error
      (error "Invalid delimiters specification %s in block token %s"
             (cdr block-spec) (car block-spec)))))