emacs-orgmode
[Top][All Lists]
Advanced

[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: Thu, 8 Feb 2007 17:46:01 +0100


On Feb 8, 2007, at 17:05, Russell Adams wrote:

I started tinkering, this being my first macro.

Looks very good already.


I can't say its behaving as I expected.

(defun my-daily-insertion

Every funtion needs an argument list, even if it is the empty one:

(defun my-daily-insertion ()


  (interactive)
  (beginning-of-buffer)

Correct, but better use (goto-char (point-min)), has fewer side effects.

  (re-search-forward "DAILY-INSERTION-POINT")
  (forward-line -1)
  (insert "*** " (format-time-string "%Y%m%d" (current-time)) )
)

Looks all fine to me.

- Carsten


I'd welcome input.

Russell

On Wed, Sep 27, 2006 at 10:09:21AM -0500, Russell Adams wrote:
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


_______________________________________________
Emacs-orgmode mailing list
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
------------------------------------------------------------------
Russell Adams                            address@hidden

PGP Key ID:     0x1160DCB3           http://www.adamsinfoserv.com/

Fingerprint:    1723 D8CA 4280 1EC9 557F  66E8 1154 E018 1160 DCB3


_______________________________________________
Emacs-orgmode mailing list
address@hidden
http://lists.gnu.org/mailman/listinfo/emacs-orgmode



--
Carsten Dominik
Sterrenkundig Instituut "Anton Pannekoek"
Universiteit van Amsterdam
Kruislaan 403
NL-1098SJ Amsterdam
phone: +31 20 525 7477





reply via email to

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