/[emacs]/emacs/lisp/international/mule-diag.el
ViewVC logotype

Diff of /emacs/lisp/international/mule-diag.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.68.2.20 by handa, Tue Jan 21 08:30:08 2003 UTC revision 1.68.2.21 by fx, Wed Apr 30 22:50:34 2003 UTC
# Line 324  detailed meanings of these arguments." Line 324  detailed meanings of these arguments."
324        (insert "Number of contained characters: ")        (insert "Number of contained characters: ")
325        (dotimes (i (charset-dimension charset))        (dotimes (i (charset-dimension charset))
326          (unless (= i 0)          (unless (= i 0)
327            (insert ?x))            (insert ?×))
328          (insert (format "%d" (charset-chars charset) (1+ i))))          (insert (format "%d" (charset-chars charset (1+ i)))))
329        (insert ?\n)        (insert ?\n)
330        (let ((char (charset-iso-final-char charset)))        (let ((char (charset-iso-final-char charset)))
331          (when (> char 0)          (when (> char 0)
# Line 1394  character)") Line 1394  character)")
1394                                        (string (string-to-number                                        (string (string-to-number
1395                                                 (nth 13 fields) 16)))))))))))                                                 (nth 13 fields) 16)))))))))))
1396    
1397    ;; Local Variables:
1398    ;; coding: utf-8
1399    ;; End:
1400  ;;; mule-diag.el ends here  ;;; mule-diag.el ends here

Legend:
Removed from v.1.68.2.20  
changed lines
  Added in v.1.68.2.21

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26