From mboxrd@z Thu Jan 1 00:00:00 1970 From: Richard Riley Subject: Re: org-clock-goto plus org-narrow-to-subtree? Date: Mon, 12 Apr 2010 16:25:24 +0200 Message-ID: References: <87fx303jnz.fsf@ara.blue-cable.net> <8739z03hr7.fsf@ara.blue-cable.net> 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 1O1KeX-0007sV-Ij for emacs-orgmode@gnu.org; Mon, 12 Apr 2010 10:30:17 -0400 Received: from [140.186.70.92] (port=48171 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1O1KeV-0007sB-6Z for emacs-orgmode@gnu.org; Mon, 12 Apr 2010 10:30:16 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1O1KeT-00056w-Tj for emacs-orgmode@gnu.org; Mon, 12 Apr 2010 10:30:15 -0400 Received: from lo.gmane.org ([80.91.229.12]:33215) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1O1KeT-00056L-M3 for emacs-orgmode@gnu.org; Mon, 12 Apr 2010 10:30:13 -0400 Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1O1KeQ-00035q-Dy for emacs-orgmode@gnu.org; Mon, 12 Apr 2010 16:30:10 +0200 Received: from 85.183.18.158 ([85.183.18.158]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 12 Apr 2010 16:30:10 +0200 Received: from rileyrgdev by 85.183.18.158 with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 12 Apr 2010 16:30:10 +0200 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 Karsten Heymann writes: > Hi Carsten, > > Carsten Dominik writes: >> On Apr 12, 2010, at 3:05 PM, Karsten Heymann wrote: >>> does anyone have a solution to combine org-clock-goto with >>> org-narrow-to-subtree, so that upon keypress I get a buffer with only >>> the currently clocked task in it? Maybe this could even become a >>> optional parameter for org-clock-goto? >> >> (defun my-clock-goto-narrow () >> (interactive) >> (when (org-clock-is-active) >> (org-clock-goto) >> (org-narrow-to-subtree))) >> >> (define-key global-map "\C-cc" my-clock-goto-narrow) > > Thanks, applied. :-) here is a slight variation I use which lists older clocked tasks if there is not one already clocked in. It also restores the window layout. ,---- | (defun rgr/org-add-note-to-current-task () | (interactive) | (save-window-excursion | (if(org-clock-is-active) | (org-clock-goto) | (org-clock-goto t)) | (org-narrow-to-subtree) | (org-add-note))) | | (define-key global-map "\C-cn" 'rgr/org-add-note-to-current-task) `----