mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2025-01-03 11:33:46 +00:00
Code

Bug fixes for iso weeks.

Browse Source
This commit is contained in:
Carsten Dominik 2008-03-20 10:06:52 +01:00
parent b114603957
commit e2eba8640f
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog
View File

@ -1,3 +1,8 @@
2008-03-20 Carsten Dominik <dominik@science.uva.nl>
* org.el (org-agenda-compute-time-span): Make argument N optional.
(org-agenda-format-date-aligned): Require `cal-iso'.
2008-03-19 Bastien Guerry <bzg@altern.org>
* org.el (org-complete): Silently fail when trying to complete

5
org.el
View File

@ -2872,6 +2872,7 @@ a calendar-style date list like (month day year)."
(defun org-agenda-format-date-aligned (date)
"Format a date string for display in the daily/weekly agenda, or timeline.
This function makes sure that dates are aligned for easy reading."
(require 'cal-iso)
(let* ((dayname (calendar-day-name date))
(day (extract-calendar-day date))
(day-of-week0 (calendar-day-of-week date))
@ -4421,6 +4422,8 @@ If it is less than 8, the level-1 face gets re-used for level N+1 etc."
(declare-function calendar-hebrew-date-string "cal-hebrew" (&optional date))
(declare-function calendar-islamic-date-string "cal-islam" (&optional date))
(declare-function calendar-iso-date-string "cal-iso" (&optional date))
(declare-function calendar-iso-from-absolute "cal-iso" (&optional date))
(declare-function calendar-absolute-from-iso "cal-iso" (&optional date))
(declare-function calendar-julian-date-string "cal-julian" (&optional date))
(declare-function calendar-mayan-date-string "cal-mayan" (&optional date))
(declare-function calendar-persian-date-string "cal-persia" (&optional date))
@ -22642,7 +22645,7 @@ SPAN may be `day', `week', `month', `year'."
(org-agenda-set-mode-name)
(message "Switched to %s view" span))
(defun org-agenda-compute-time-span (sd span n)
(defun org-agenda-compute-time-span (sd span &optional n)
"Compute starting date and number of days for agenda.
SPAN may be `day', `week', `month', `year'. The return value
is a cons cell with the starting date and the number of days,