From mboxrd@z Thu Jan 1 00:00:00 1970 From: Thomas Morgan Subject: Persistent filters in Org mode Date: Thu, 06 May 2010 00:21:31 -0400 Message-ID: <87mxwd7j90.fsf@ziiuu.com> 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 1O9san-0007ze-JB for emacs-orgmode@gnu.org; Thu, 06 May 2010 00:21:45 -0400 Received: from [140.186.70.92] (port=34094 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1O9sam-0007xc-At for emacs-orgmode@gnu.org; Thu, 06 May 2010 00:21:45 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1O9sak-0002rZ-Kg for emacs-orgmode@gnu.org; Thu, 06 May 2010 00:21:44 -0400 Received: from lo.gmane.org ([80.91.229.12]:48425) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1O9sak-0002rC-Ad for emacs-orgmode@gnu.org; Thu, 06 May 2010 00:21:42 -0400 Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1O9sai-0002uf-2y for emacs-orgmode@gnu.org; Thu, 06 May 2010 06:21:40 +0200 Received: from cpe-74-68-118-254.nyc.res.rr.com ([74.68.118.254]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 06 May 2010 06:21:40 +0200 Received: from tlm by cpe-74-68-118-254.nyc.res.rr.com with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 06 May 2010 06:21:40 +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 Hello, Org mode hackers, This patch defines a variable `org-agenda-persistent-filters'. When it is set, filters persist from one agenda view to the next. I've found this convenient when using tags for contexts like @home, @net, etc., some of which commonly remain applicable for a while. Thanks, Thomas >From 052ef9205845c78cb24d6fea8f89484bbe12a528 Mon Sep 17 00:00:00 2001 From: Thomas Morgan Date: Fri, 23 Apr 2010 11:48:03 +0200 Subject: [PATCH] New option `org-agenda-persistent-filters'. When set, keep filters from one agenda view to the next. --- lisp/org-agenda.el | 10 ++++++++-- 1 files changed, 8 insertions(+), 2 deletions(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 93ef921..c8fd731 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -197,6 +197,11 @@ you can \"misuse\" it to also add other text to the header. However, :group 'org-export-html :type 'string) +(defcustom org-agenda-persistent-filters nil + "When set, keep filters from one agenda view to the next." + :group 'org-agenda + :type 'boolean) + (defgroup org-agenda-custom-commands nil "Options concerning agenda views in Org-mode." :tag "Org Agenda Custom Commands" @@ -2713,7 +2718,8 @@ bind it in the options section.") (setq org-todo-keywords-for-agenda nil) (setq org-done-keywords-for-agenda nil) (setq org-drawers-for-agenda nil) - (setq org-agenda-filter nil) + (unless org-agenda-persistent-filters + (setq org-agenda-filter nil)) (put 'org-agenda-filter :preset-filter org-agenda-filter-preset) (if org-agenda-multi (progn @@ -2788,7 +2794,7 @@ bind it in the options section.") (org-habit-insert-consistency-graphs)) (run-hooks 'org-finalize-agenda-hook) (setq org-agenda-type (org-get-at-bol 'org-agenda-type)) - (when (get 'org-agenda-filter :preset-filter) + (when (or org-agenda-filter (get 'org-agenda-filter :preset-filter)) (org-agenda-filter-apply org-agenda-filter)) ))) -- 1.6.3.3