From mboxrd@z Thu Jan 1 00:00:00 1970 From: Manuel Giraud Subject: [PATCH] * org-publish.el (org-publish-find-date): optimization Date: Tue, 19 Apr 2011 17:41:29 +0200 Message-ID: <1303227689-950-1-git-send-email-manuel.giraud@univ-nantes.fr> Return-path: Received: from eggs.gnu.org ([140.186.70.92]:53526) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QCD3n-0002oI-2r for emacs-orgmode@gnu.org; Tue, 19 Apr 2011 11:41:51 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1QCD3m-0005gR-7S for emacs-orgmode@gnu.org; Tue, 19 Apr 2011 11:41:51 -0400 Received: from smtp-tls1.univ-nantes.fr ([193.52.101.145]:51532 helo=smtp-tls.univ-nantes.fr) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1QCD3m-0005gJ-1X for emacs-orgmode@gnu.org; Tue, 19 Apr 2011 11:41:50 -0400 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 Cc: Manuel Giraud Hi, elp reports important speed gain with this patch to find an org file date. --- lisp/org-publish.el | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/lisp/org-publish.el b/lisp/org-publish.el index e944eea..7470ee2 100644 --- a/lisp/org-publish.el +++ b/lisp/org-publish.el @@ -852,7 +852,7 @@ system's modification time. It returns time in `current-time' format." (let ((visiting (find-buffer-visiting file))) (save-excursion - (switch-to-buffer (or visiting (find-file file))) + (switch-to-buffer (or visiting (find-file-noselect file nil t))) (let* ((plist (org-infile-export-plist)) (date (plist-get plist :date))) (unless visiting -- 1.7.3.5