From mboxrd@z Thu Jan 1 00:00:00 1970 From: Russell Adams Subject: Re: Feature Request Date: Thu, 8 Feb 2007 10:05:49 -0600 Message-ID: <20070208160549.GB16624@odin.demosthenes.org> References: <20060925235852.GA32259@keroberos> <6b49125ddc270e8732b471029ab82eb5@science.uva.nl> <20060927150921.GB17927@keroberos> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1HFBmb-0003od-Oh for emacs-orgmode@gnu.org; Thu, 08 Feb 2007 11:06:01 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1HFBmZ-0003nj-Lm for emacs-orgmode@gnu.org; Thu, 08 Feb 2007 11:06:00 -0500 Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1HFBmZ-0003nd-G9 for emacs-orgmode@gnu.org; Thu, 08 Feb 2007 11:05:59 -0500 Received: from squirtle.drak.net ([72.52.144.201]) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA:32) (Exim 4.52) id 1HFBmY-0000DZ-VK for emacs-orgmode@gnu.org; Thu, 08 Feb 2007 11:05:59 -0500 Received: from 206.180.154.177.adsl.hal-pc.org ([206.180.154.177] helo=localhost) by squirtle.drak.net with esmtpa (Exim 4.63) (envelope-from ) id 1HFBmM-0000yW-3u for emacs-orgmode@gnu.org; Thu, 08 Feb 2007 10:05:46 -0600 Content-Disposition: inline In-Reply-To: <20060927150921.GB17927@keroberos> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org I started tinkering, this being my first macro. I can't say its behaving as I expected. (defun my-daily-insertion (interactive) (beginning-of-buffer) (re-search-forward "DAILY-INSERTION-POINT") (forward-line -1) (insert "*** " (format-time-string "%Y%m%d" (current-time)) ) ) 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 RLAdams@AdamsInfoServ.com > > PGP Key ID: 0x1160DCB3 http://www.adamsinfoserv.com/ > > Fingerprint: 1723 D8CA 4280 1EC9 557F 66E8 1154 E018 1160 DCB3 > > > _______________________________________________ > Emacs-orgmode mailing list > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode ------------------------------------------------------------------ Russell Adams RLAdams@AdamsInfoServ.com PGP Key ID: 0x1160DCB3 http://www.adamsinfoserv.com/ Fingerprint: 1723 D8CA 4280 1EC9 557F 66E8 1154 E018 1160 DCB3