diff lisp/calendar/cal-persia.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-persia.el	Tue Apr 08 07:04:17 2008 +0000
+++ b/lisp/calendar/cal-persia.el	Tue Apr 08 07:07:17 2008 +0000
@@ -152,9 +152,9 @@
          (y (calendar-extract-year persian-date))
          (m (calendar-extract-month persian-date))
          (monthname (aref calendar-persian-month-name-array (1- m)))
-         (day (int-to-string (calendar-extract-day persian-date)))
-         (year (int-to-string y))
-         (month (int-to-string m))
+         (day (number-to-string (calendar-extract-day persian-date)))
+         (year (number-to-string y))
+         (month (number-to-string m))
          dayname)
     (mapconcat 'eval calendar-date-display-form "")))
 
@@ -174,7 +174,7 @@
   (let* ((year (calendar-read
                 "Persian calendar year (not 0): "
                 (lambda (x) (not (zerop x)))
-                (int-to-string
+                (number-to-string
                  (calendar-extract-year
                   (calendar-persian-from-absolute
                    (calendar-absolute-from-gregorian