From mboxrd@z Thu Jan 1 00:00:00 1970 From: Allen Li Subject: [PATCH] org-agenda: Store stuck project redo command Date: Wed, 19 Apr 2017 22:52:56 -0700 Message-ID: <87wpafaamf.fsf@felesatra.moe> References: Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:33477) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1d151b-0004bx-MJ for emacs-orgmode@gnu.org; Thu, 20 Apr 2017 01:53:04 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1d151Y-0008Tp-Ji for emacs-orgmode@gnu.org; Thu, 20 Apr 2017 01:53:03 -0400 Received: from solmarta.felesatra.moe ([198.199.111.162]:39907) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1d151Y-0008Te-DB for emacs-orgmode@gnu.org; Thu, 20 Apr 2017 01:53:00 -0400 In-Reply-To: (message from Allen Li on Wed, 19 Apr 2017 01:40:27 -0700) 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" To: mail@nicolasgoaziou.fr, emacs-orgmode@gnu.org * lisp/org-agenda.el (org-agenda-list-stuck-projects): Store the redo command in a text property so it is found correctly. `org-agenda-redo' checks the `org-redo-cmd' text property, not `org-agenda-redo-command'. TINYCHANGE --- lisp/org-agenda.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index cf9351a9b..78c1a37f4 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -4971,7 +4971,11 @@ of what a project is and how to check if it stuck, customize the variable (setq org-agenda-buffer-name (buffer-name)) (with-current-buffer org-agenda-buffer-name (setq org-agenda-redo-command - `(org-agenda-list-stuck-projects ,current-prefix-arg))))) + `(org-agenda-list-stuck-projects ,current-prefix-arg)) + (let ((inhibit-read-only t)) + (add-text-properties + (point-min) (point-max) + `(org-redo-cmd ,org-agenda-redo-command)))))) ;;; Diary integration -- 2.12.2