Mercurial > emacs
diff lisp/calendar/calendar.el @ 62402:a7e02ef1e3d6
Replace `string-to-int' by `string-to-number'.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Mon, 16 May 2005 11:33:47 +0000 |
parents | 31aa9a390538 |
children | c3dbcfe29c9e f042e7c0fe20 |
line wrap: on
line diff
--- a/lisp/calendar/calendar.el Mon May 16 10:07:59 2005 +0000 +++ b/lisp/calendar/calendar.el Mon May 16 11:33:47 2005 +0000 @@ -2574,7 +2574,7 @@ (if (not (looking-at " ")) (re-search-backward "[^0-9]")) (list month - (string-to-int (buffer-substring (1+ (point)) (+ 4 (point)))) + (string-to-number (buffer-substring (1+ (point)) (+ 4 (point)))) year)) (if (looking-at "\\*") (save-excursion @@ -2964,7 +2964,7 @@ (make-local-variable 'calendar-starred-day) (forward-char 1) (setq calendar-starred-day - (string-to-int + (string-to-number (buffer-substring (point) (- (point) 2)))) (delete-char -2) (insert "**")