[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Orgmode] Feature Request

From: Carsten Dominik
Subject: Re: [Orgmode] Feature Request
Date: Tue, 26 Sep 2006 14:37:27 +0200

On Sep 26, 2006, at 1:58, Russell Adams wrote:

I've gotten in a habit of storing my todo's in the following format,
and I'm curious if there's a way to automate this...

* Daily
** 2006-09
*** 2006-09-25
**** TODO Item One

I don't always have an item for each day, its sparsely populated, but
I'd like to automate making the first few headings.

Any suggestions? Even a macro? ;]

The cl macro "loop" is your friend....

(defun my-date-tree (y1 y2)
  (interactive "nFirst year: \nnLast year: ")
  (require 'calendar)
  (loop for y from y1 to y2 do
    (message "Doing year %d..." y)
    (insert "* " (format "%4d" y) "\n")
    (loop for m from 1 to 12 do
      (insert "** " (format "%4d-%02d" y m) "\n")
      (loop for d from 1 to 31 do
        (when (= m (car
                      (list m d y)))))
          (insert "*** " (format "%4d-%02d-%02d" y m d) "\n"))))))

Hope this helps

- Carsten

reply via email to

[Prev in Thread] Current Thread [Next in Thread]