[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/calendar/calendar.el
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/calendar/calendar.el |
Date: |
Mon, 16 May 2005 07:11:50 -0400 |
Index: emacs/lisp/calendar/calendar.el
diff -c emacs/lisp/calendar/calendar.el:1.168
emacs/lisp/calendar/calendar.el:1.169
*** emacs/lisp/calendar/calendar.el:1.168 Fri Apr 8 14:26:13 2005
--- emacs/lisp/calendar/calendar.el Mon May 16 11:11:48 2005
***************
*** 2574,2580 ****
(if (not (looking-at " "))
(re-search-backward "[^0-9]"))
(list month
! (string-to-int (buffer-substring (1+ (point)) (+ 4 (point))))
year))
(if (looking-at "\\*")
(save-excursion
--- 2574,2580 ----
(if (not (looking-at " "))
(re-search-backward "[^0-9]"))
(list month
! (string-to-number (buffer-substring (1+ (point)) (+ 4
(point))))
year))
(if (looking-at "\\*")
(save-excursion
***************
*** 2964,2970 ****
(make-local-variable 'calendar-starred-day)
(forward-char 1)
(setq calendar-starred-day
! (string-to-int
(buffer-substring (point) (- (point) 2))))
(delete-char -2)
(insert "**")
--- 2964,2970 ----
(make-local-variable 'calendar-starred-day)
(forward-char 1)
(setq calendar-starred-day
! (string-to-number
(buffer-substring (point) (- (point) 2))))
(delete-char -2)
(insert "**")
- [Emacs-diffs] Changes to emacs/lisp/calendar/calendar.el,
Juanma Barranquero <=