From fa64065b1befda06dda72cf5b8f30dc650a3663f Mon Sep 17 00:00:00 2001 From: Dave Love Date: Thu, 5 Dec 2002 14:31:28 +0000 Subject: [PATCH] (unicode-data): Fix treatment of numeric-value fields. --- lisp/ChangeLog | 8 ++++++++ lisp/international/mule-diag.el | 9 +++------ 2 files changed, 11 insertions(+), 6 deletions(-) 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")) -- 2.39.5