[Emacs-diffs] Changes to emacs/lisp/nxml/xsd-regexp.el,v

[Juanma Barranquero]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      08/07/03 12:25:23

Index: nxml/xsd-regexp.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/nxml/xsd-regexp.el,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- nxml/xsd-regexp.el  6 May 2008 04:25:58 -0000       1.5
+++ nxml/xsd-regexp.el  3 Jul 2008 12:25:23 -0000       1.6
@@ -141,7 +141,7 @@
     
 
 (defun xsdre-range-list-union (range-lists)
-  "Return a range-list the union of a list of range-lists."
+  "Return a range-list, the union of a list of range-lists."
   (xsdre-make-range-list (apply 'append range-lists)))
 
 (defun xsdre-range-list-difference (orig subtract)
@@ -181,7 +181,7 @@
           (< (xsdre-range-last r1) (xsdre-range-last r2)))))
 
 (defun xsdre-check-range-list (range-list)
-  "Check that range-list is a range-list.
+  "Check that RANGE-LIST is a range-list.
 Signal an error if it is not."
   (let ((last nil))
     (while range-list
@@ -293,7 +293,7 @@
     (string (decode-char 'ucs ch))))
   
 (defun xsdre-char-class-to-range-list (cc)
-  "Return a range-list for a symbolic char-class."
+  "Return a range-list for a symbolic char-class CC."
   (cond ((integerp cc) (list cc))
        ((symbolp cc)
         (or (get cc 'xsdre-ranges)