[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH] Change: (org-agenda-bulk-action) Prompt w/number of marked i
From: |
Adam Porter |
Subject: |
[O] [PATCH] Change: (org-agenda-bulk-action) Prompt w/number of marked items |
Date: |
Sun, 02 Sep 2018 04:00:49 -0500 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/26.1 (gnu/linux) |
* lisp/org-agenda.el (org-agenda-bulk-action): When scattering, prompt
for number of days with number of marked items.
A typical pattern for me is to mark a significant number of items
scheduled in the past and scatter them into the future. Usually I
want to schedule one item per day, i.e. across a number of days equal
to the number of marked items. The default prompt is 7 days, and
counting the number of items is tedious. This uses the number of
marked items as the initial prompt for the number of days.
Alternatively, the number of marked items could be indicated in the
prompt string, e.g. "Scatter X tasks across how many days:". A
customizeable default could also be provided.
---
lisp/org-agenda.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index eaeddb6..44ecd70 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -9967,7 +9967,7 @@ The prefix arg is passed through to the command if
possible."
(let ((days (read-number
(format "Scatter tasks across how many %sdays: "
(if arg "week" ""))
- 7)))
+ (length org-agenda-bulk-marked-entries))))
(setq cmd
`(lambda ()
(let ((distance (1+ (random ,days))))
--
2.7.4
- [O] [PATCH] Change: (org-agenda-bulk-action) Prompt w/number of marked items,
Adam Porter <=