[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Orgmode] Feature Request
From: |
Russell Adams |
Subject: |
Re: [Orgmode] Feature Request |
Date: |
Wed, 27 Sep 2006 10:09:21 -0500 |
User-agent: |
Mutt/1.4.2.1i |
The way I'm reading that macro, it'll prompt me for a date, etc. That
would be useful for creating a range of dates in a tree if I needed to
define a time period.
I guess I didn't explain myself clearly. I wanted to generate those
dated headings under the "Daily" heading for the current date
only. Just a shortcut so I can hit a single key to add todo items for
today, and have them added to my chronological "Daily" tree.
I've just found that I'm managing TODO and agenda scheduled items
well, but I didn't have a good way to handle all the little
miscellaneous items that pop up. No reason to spend time filing them
elsewhere, just a date would suffice. It also helps keep the tree
sparse when searching.
Russell
On Tue, Sep 26, 2006 at 02:37:27PM +0200, Carsten Dominik wrote:
>
> 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
> (calendar-gregorian-from-absolute
> (calendar-absolute-from-gregorian
> (list m d y)))))
> (insert "*** " (format "%4d-%02d-%02d" y m d) "\n"))))))
>
> Hope this helps
>
> - Carsten
>
------------------------------------------------------------------
Russell Adams address@hidden
PGP Key ID: 0x1160DCB3 http://www.adamsinfoserv.com/
Fingerprint: 1723 D8CA 4280 1EC9 557F 66E8 1154 E018 1160 DCB3