[Emacs-diffs] Changes to emacs/admin/unidata/unidata-gen.el,v

[Juanma Barranquero]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      08/04/14 10:43:06

Index: unidata-gen.el
===================================================================
RCS file: /sources/emacs/emacs/admin/unidata/unidata-gen.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- unidata-gen.el      2 Feb 2008 03:52:44 -0000       1.4
+++ unidata-gen.el      14 Apr 2008 10:43:06 -0000      1.5
@@ -40,8 +40,11 @@
 ;;     (name, generic-category, etc), and FILE is a name of one of
 ;;     the following files.
 ;;
-;;   uni-name.el, uni-cat.el, uni-comb.el, uni-bidi.el
-;;     It contains a single form of this format:
+;;   uni-name.el, uni-category.el, uni-combining.el, uni-bidi.el,
+;;   uni-decomposition.el, uni-decimal.el, uni-digit.el, uni-numeric.el,
+;;   uni-mirrored.el, uni-old-name.el, uni-comment.el, uni-uppercase.el,
+;;   uni-lowercase.el, uni-titlecase.el
+;;     They each contain a single form of this format:
 ;;       (char-code-property-register PROP CHAR-TABLE)
 ;;     where PROP is the same as above, and CHAR-TABLE is a
 ;;     char-table containing property values in a compressed format.
@@ -180,7 +183,7 @@
     (numeric-value
      8 unidata-gen-table-symbol "uni-numeric.el"
      "Unicode numeric value (numeric).
-Property value is an symbol.")
+Property value is a symbol.")
     (mirrored
      9 unidata-gen-table-symbol "uni-mirrored.el"
      "Unicode bidi mirrored flag.
@@ -255,7 +258,7 @@
 (defun unidata-put-character (char val table)
   (or (characterp val)
       (not val)
-      (error "Not an character nor nil: %S" val))
+      (error "Not a character nor nil: %S" val))
   (let ((current-val (aref table char)))
     (unless (eq current-val val)
       (if (stringp current-val)