diff lisp/calendar/cal-coptic.el @ 93844:bf9ef749c23e

Replace int-to-string with number-to-string.
author Glenn Morris <rgm@gnu.org>
date Tue, 08 Apr 2008 07:07:17 +0000
parents 3ff2b47de8f2
children e49abd957e81
line wrap: on
line diff
--- a/lisp/calendar/cal-coptic.el	Tue Apr 08 07:04:17 2008 +0000
+++ b/lisp/calendar/cal-coptic.el	Tue Apr 08 07:07:17 2008 +0000
@@ -122,10 +122,10 @@
     (if (< y 1)
         ""
       (let ((monthname (aref calendar-coptic-month-name-array (1- m)))
-            (day (int-to-string (calendar-extract-day coptic-date)))
+            (day (number-to-string (calendar-extract-day coptic-date)))
             (dayname nil)
-            (month (int-to-string m))
-            (year (int-to-string y)))
+            (month (number-to-string m))
+            (year (number-to-string y)))
         (mapconcat 'eval calendar-date-display-form "")))))
 
 ;;;###cal-autoload
@@ -147,7 +147,7 @@
          (year (calendar-read
                 (format "%s calendar year (>0): " calendar-coptic-name)
                 (lambda (x) (> x 0))
-                (int-to-string
+                (number-to-string
                  (calendar-extract-year
                   (calendar-coptic-from-absolute
                    (calendar-absolute-from-gregorian today))))))