changeset 89315:e0cf39ef0392

(unicode-data): Fix treatment of numeric-value fields.
author Dave Love <fx@gnu.org>
date Thu, 05 Dec 2002 14:28:39 +0000
parents f040012c16bb
children caee7b20292f
files lisp/international/mule-diag.el
diffstat 1 files changed, 3 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-diag.el	Thu Dec 05 14:28:21 2002 +0000
+++ b/lisp/international/mule-diag.el	Thu Dec 05 14:28:39 2002 +0000
@@ -1373,14 +1373,11 @@
 					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"))