From mboxrd@z Thu Jan 1 00:00:00 1970 From: Thorsten Jolitz Subject: Re: How can I calculate the "age" of a headline? Date: Tue, 19 Aug 2014 17:34:25 +0200 Message-ID: <87tx58ebni.fsf@gmail.com> References: Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:41744) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XJlQt-0003kK-9r for emacs-orgmode@gnu.org; Tue, 19 Aug 2014 11:34:54 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1XJlQl-0002D8-NI for emacs-orgmode@gnu.org; Tue, 19 Aug 2014 11:34:47 -0400 Received: from plane.gmane.org ([80.91.229.3]:53218) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XJlQl-0002D1-HJ for emacs-orgmode@gnu.org; Tue, 19 Aug 2014 11:34:39 -0400 Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1XJlQk-0003CB-5T for emacs-orgmode@gnu.org; Tue, 19 Aug 2014 17:34:38 +0200 Received: from g231224050.adsl.alicedsl.de ([92.231.224.50]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Tue, 19 Aug 2014 17:34:38 +0200 Received: from tjolitz by g231224050.adsl.alicedsl.de with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Tue, 19 Aug 2014 17:34:38 +0200 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org M writes: > In my task lists, I'm working with scheduled and deadline dates. > However, it would also often be very interesting, how "old" a task is, how > long it is lurking around on my lists.. I copied Bernt Hansens setup for toggling automatic insertion of inactive timestamps at headline creation. The tj/ prefix is there only for my convenience, it should really be bh/ (-> Bernt Hansen). #+BEGIN_SRC emacs-lisp ;; *** Timestamps ;; **** Configuration (add-hook 'org-insert-heading-hook 'tj/insert-heading-inactive-timestamp 'append) ;; **** Functions (defvar tj/insert-inactive-timestamp t) (defun tj/toggle-insert-inactive-timestamp () (interactive) (setq tj/insert-inactive-timestamp (not tj/insert-inactive-timestamp)) (message "Heading timestamps are %s" (if tj/insert-inactive-timestamp "ON" "OFF"))) (defun tj/insert-inactive-timestamp () (interactive) (org-insert-time-stamp nil t t nil nil nil)) (defun tj/insert-heading-inactive-timestamp () (save-excursion (when tj/insert-inactive-timestamp (org-return) (org-cycle) (tj/insert-inactive-timestamp)))) #+END_SRC -- cheers, Thorsten