changeset 77172:4c69a90220e3

(ebnf-insert-style, ebnf-merge-style): Fix typos in error messages.
author Juanma Barranquero <lekktu@gmail.com>
date Fri, 13 Apr 2007 09:08:12 +0000
parents 6540b56c4b3d
children 5e4b72114bc4
files lisp/progmodes/ebnf2ps.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/ebnf2ps.el	Fri Apr 13 09:05:43 2007 +0000
+++ b/lisp/progmodes/ebnf2ps.el	Fri Apr 13 09:08:12 2007 +0000
@@ -2609,7 +2609,7 @@
   (and (assoc name ebnf-style-database)
        (error "Style name already exists: %s" name))
   (or (assoc inherits ebnf-style-database)
-      (error "Style inheritance name does'nt exist: %s" inherits))
+      (error "Style inheritance name doesn't exist: %s" inherits))
   (setq ebnf-style-database
 	(cons (cons name (cons inherits (ebnf-check-style-values values)))
 	      ebnf-style-database)))
@@ -2639,7 +2639,7 @@
 See `ebnf-style-database' documentation."
   (interactive "SStyle name: \nXStyle values: ")
   (let ((style (or (assoc name ebnf-style-database)
-		   (error "Style name does'nt exist: %s" name)))
+		   (error "Style name doesn't exist: %s" name)))
 	(merge (ebnf-check-style-values values))
 	val elt new check)
     ;; modify value of existing variables