From mboxrd@z Thu Jan 1 00:00:00 1970 From: Benjamin Andresen Subject: [PATCH] agenda startup: log-mode should be customizable as well Date: Thu, 14 May 2009 05:57:17 +0200 Message-ID: <87prec9w0y.fsf@in-ulm.de> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1M4SBx-0008S9-FM for emacs-orgmode@gnu.org; Thu, 14 May 2009 00:05:09 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1M4SBt-0008Rw-Q1 for emacs-orgmode@gnu.org; Thu, 14 May 2009 00:05:09 -0400 Received: from [199.232.76.173] (port=33071 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1M4SBt-0008Rt-MO for emacs-orgmode@gnu.org; Thu, 14 May 2009 00:05:05 -0400 Received: from main.gmane.org ([80.91.229.2]:49855 helo=ciao.gmane.org) by monty-python.gnu.org with esmtps (TLS-1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1M4SBt-0001fu-2R for emacs-orgmode@gnu.org; Thu, 14 May 2009 00:05:05 -0400 Received: from root by ciao.gmane.org with local (Exim 4.43) id 1M4SBr-0004Sj-0S for emacs-orgmode@gnu.org; Thu, 14 May 2009 04:05:03 +0000 Received: from i577a1215.versanet.de ([87.122.18.21]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 14 May 2009 04:05:02 +0000 Received: from benny by i577a1215.versanet.de with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Thu, 14 May 2009 04:05:02 +0000 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 --=-=-= Hey there, I was curious as to why a value such log-mode wasn't customizable to be run on start-up as follow-mode and clock-report-mode are. If Carsten thinks this is a good idea, I've attached a patch that may shave of 5 seconds of him adding it. It applies cleanly to current git HEAD. br, benny --=-=-= Content-Disposition: inline; filename=org-agenda-show-log.diff diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 7622f6a..e52fdbc 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -628,6 +628,7 @@ Needs to be set before org.el is loaded." :group 'org-agenda-startup :type 'boolean) + (defvar org-agenda-include-inactive-timestamps nil "Non-nil means, include inactive time stamps in agenda and timeline.") @@ -789,6 +790,12 @@ agenda display." :group 'org-agenda-daily/weekly :type 'boolean) +(defcustom org-agenda-start-with-log-mode nil + "The initial value of log-mode in a newly created agenda window." + :group 'org-agenda-startup + :group 'org-agenda-daily/weekly + :type 'boolean) + (defcustom org-agenda-start-with-clockreport-mode nil "The initial value of clockreport-mode in a newly created agenda window." :group 'org-agenda-startup @@ -1252,7 +1259,7 @@ The following commands are available: (unless org-agenda-keep-modes (setq org-agenda-follow-mode org-agenda-start-with-follow-mode org-agenda-clockreport-mode org-agenda-start-with-clockreport-mode - org-agenda-show-log nil)) + org-agenda-show-log org-agenda-start-with-log-mode)) (easy-menu-change '("Agenda") "Agenda Files" (append --=-=-= Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Disposition: inline _______________________________________________ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode --=-=-=--