[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Sun, 29 Aug 2004 16:42:15 +0200
Emacs' Calendar already has `calendar-goto-iso-date', but it
requires too much user input when you just want to jump to
a given week. The following command should help you in such
I bind it to "g w" in `calendar-mode'.
(defun calendar-goto-iso-week (week year)
"Move cursor to ISO week number WEEK of year YEAR.
Interactively uses the \"current\" year and just asks for a week number."
(let* ((year (extract-calendar-year (calendar-cursor-to-date t)))
(list 1 4 (1+ year))))))))
(format "ISO calendar week (1-%d): " no-weeks)
'(lambda (x) (and (> x 0) (<= x no-weeks))))))
(list week year))))
(calendar-goto-iso-date (list week calendar-week-start-day year)))
|[Prev in Thread]
||[Next in Thread]|
Emilio Lopes <=