From mboxrd@z Thu Jan 1 00:00:00 1970 From: Bernt Hansen Subject: [PATCH] Report org-version after reloading Date: Thu, 9 Apr 2009 17:19:30 -0400 Message-ID: <1239311972-3362-1-git-send-email-bernt@norang.ca> Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1Ls1fd-0003i1-SQ for emacs-orgmode@gnu.org; Thu, 09 Apr 2009 17:20:25 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1Ls1fa-0003gN-5Z for emacs-orgmode@gnu.org; Thu, 09 Apr 2009 17:20:25 -0400 Received: from [199.232.76.173] (port=53057 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1Ls1fZ-0003gJ-TC for emacs-orgmode@gnu.org; Thu, 09 Apr 2009 17:20:21 -0400 Received: from mho-01-ewr.mailhop.org ([204.13.248.71]:51696) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1Ls1fZ-0007MD-Kc for emacs-orgmode@gnu.org; Thu, 09 Apr 2009 17:20:21 -0400 Received: from cpe000102d0fe75-cm0012256ecbde.cpe.net.cable.rogers.com ([99.239.148.180] helo=mail.norang.ca) by mho-01-ewr.mailhop.org with esmtpsa (TLSv1:AES256-SHA:256) (Exim 4.68) (envelope-from ) id 1Ls1fV-000MiG-Qy for emacs-orgmode@gnu.org; Thu, 09 Apr 2009 21:20:18 +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 Cc: Bernt Hansen --- I'm always typing 'M-x org-version' after reloading the compiled or uncompiled org files using 'M-x org-reload'. This just saves me typing that extra command each time. Yes I'm lazy ;) This and the following patches are available on my for-carsten branch. -Bernt lisp/org.el | 3 ++- 1 files changed, 2 insertions(+), 1 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index c17a694..249f843 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -14774,7 +14774,8 @@ With prefix arg UNCOMPILED, load the uncompiled versions." (file-exists-p (concat f ".elc"))) (load (concat f ".elc") nil nil t) (load (concat f ".el") nil nil t)))) - files))) + files)) + (org-version)) ;;;###autoload (defun org-customize () -- 1.6.2.2.485.ge37347