From: Dave Love Date: Thu, 5 Dec 2002 14:31:28 +0000 (+0000) Subject: (unicode-data): Fix treatment of X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~147 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fa64065b1befda06dda72cf5b8f30dc650a3663f;p=emacs.git (unicode-data): Fix treatment of numeric-value fields. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0b60fdad54c..d838250d887 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,11 @@ +2002-12-05 Dave Love + + * international/characters.el: Move parts around so that syntax + definitions aren't overwritten wrongly. + + * international/mule-diag.el (unicode-data): Fix treatment of + numeric-value fields. + 2002-12-01 Dave Love * progmodes/cap-words.el: New file. diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el index 8ba3fa06bce..80511746b31 100644 --- a/lisp/international/mule-diag.el +++ b/lisp/international/mule-diag.el @@ -1373,14 +1373,11 @@ character)") parts " ")) (concat info parts)))) (list "Decimal digit value" - (if (nth 5 fields) - (string-to-number (nth 5 fields)))) + (nth 5 fields)) (list "Digit value" - (if (nth 6 fields) - (string-to-number (nth 6 fields)))) + (nth 6 fields)) (list "Numeric value" - (if (nth 7 fields) - (string-to-number (nth 6 fields)))) + (nth 7 fields)) (list "Mirrored" (if (equal "Y" (nth 8 fields)) "yes"))