Re: Week number

[Charles Sebold]

On 14 Oct 2008, Charles Sebold wrote:

> Here's how org-mode does it:

Sorry, this is really what you were asking for, then:

(defun crs-iso-week (&optional date)
  "Week number of ISO date of Gregorian DATE.
Defaults to today's date if DATE is not given."
  (require 'cal-iso)
  (let* ((d (calendar-absolute-from-gregorian
             (or date (calendar-current-date))))
         (iso-date (calendar-iso-from-absolute d)))
    (format "%dw%2d" (extract-calendar-year iso-date)
            (extract-calendar-month iso-date))))
-- 
Charles Sebold                                     14th of October, 2008