From mboxrd@z Thu Jan 1 00:00:00 1970 From: Bernt Hansen Subject: [PATCH 1/3] Honour existing restrictions when regenerating the agenda Date: Fri, 30 Dec 2011 05:49:07 -0500 Message-ID: <1325242149-22487-2-git-send-email-bernt@norang.ca> References: <1325242149-22487-1-git-send-email-bernt@norang.ca> Return-path: Received: from eggs.gnu.org ([140.186.70.92]:54712) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Rga1n-0006YN-0j for emacs-orgmode@gnu.org; Fri, 30 Dec 2011 05:49:36 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Rga1m-00031L-0L for emacs-orgmode@gnu.org; Fri, 30 Dec 2011 05:49:34 -0500 Received: from mho-03-ewr.mailhop.org ([204.13.248.66]:52935 helo=mho-01-ewr.mailhop.org) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Rga1l-00030m-Uh for emacs-orgmode@gnu.org; Fri, 30 Dec 2011 05:49:33 -0500 Received: from cpe000102d0fe75-cm0012256ecbde.cpe.net.cable.rogers.com ([72.136.255.45] helo=mail.norang.ca) by mho-01-ewr.mailhop.org with esmtpsa (TLSv1:AES256-SHA:256) (Exim 4.72) (envelope-from ) id 1Rga1f-0001GR-6j for emacs-orgmode@gnu.org; Fri, 30 Dec 2011 10:49:27 +0000 In-Reply-To: <1325242149-22487-1-git-send-email-bernt@norang.ca> 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: Bernt Hansen * lisp/org.el: Honour existing restrictions when regenerating the agenda Narrowed org buffers are now retained when regenerating the agenda with org-agenda-redo --- lisp/org.el | 14 +++++++------- 1 files changed, 7 insertions(+), 7 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 14b182b..75e6527 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -16431,13 +16431,13 @@ When a buffer is unmodified, it is just killed. When modified, it is saved (rea (concat ":" org-archive-tag ":")) bmp file re) (save-excursion - (save-restriction - (while (setq file (pop files)) - (catch 'nextfile - (if (bufferp file) - (set-buffer file) - (org-check-agenda-file file) - (set-buffer (org-get-agenda-file-buffer file))) + (while (setq file (pop files)) + (catch 'nextfile + (if (bufferp file) + (set-buffer file) + (org-check-agenda-file file) + (set-buffer (org-get-agenda-file-buffer file))) + (save-restriction (widen) (setq bmp (buffer-modified-p)) (org-refresh-category-properties) -- 1.7.8.247.g10f4e