From: matiyam <matiyam@gmail.com>
To: emacs-orgmode@gnu.org
Subject: Not archiving incompletes TODOs by accident with org-archive-subtree
Date: Thu, 29 Mar 2007 12:59:38 +0200 [thread overview]
Message-ID: <eug66q$sf3$2@sea.gmane.org> (raw)
Hi!
I have sometimes archives some headings with incompleted TODOs by accident.
I find that calling C-u C-c C-x C-s (org-archive-subtree with finde-done =
t) is a lot of typing that C-c $ .
So, to avoid this, i have introduced a new variable,
org-archive-subtree-always-call-find-done, so that when it's set to 't ,
org-archive-subtree will always behave as if called with find-done set
to 't.
(By default is set to nil, so org-archive-subtree will behave as always for
the rest of the world)
Maybe it's interesting to somebody, and it's a really small patch:
(Against 4.69 version)
=== modified file 'org.el'
--- org.el 2007-03-29 10:29:19 +0000
+++ org.el 2007-03-29 10:48:40 +0000
@@ -618,6 +618,12 @@
:group 'org-archive
:type 'boolean)
+(defcustom org-archive-subtree-always-call-find-done nil
+ "Non-nil will make that calling org-archive-subtree behaves as if called
with param find-done=t."
+ :group 'org-archive
+ :type 'boolean)
+
+
(defgroup org-table nil
"Options concerning tables in Org-mode."
:tag "Org Table"
@@ -5566,7 +5572,7 @@
1 trees. If the cursor is on a headline, only try the direct children of
this heading. "
(interactive "P")
- (if find-done
+ (if (or find-done org-archive-subtree-always-call-find-done)
(org-archive-all-done)
;; Save all relevant TODO keyword-relatex variables
Thanks a lot for org-mode, it's great!!
-- M
next reply other threads:[~2007-03-29 11:07 UTC|newest]
Thread overview: 2+ messages / expand[flat|nested] mbox.gz Atom feed top
2007-03-29 10:59 matiyam [this message]
2007-03-29 14:38 ` Not archiving incompletes TODOs by accident with org-archive-subtree Carsten Dominik
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to='eug66q$sf3$2@sea.gmane.org' \
--to=matiyam@gmail.com \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.