emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Orgmode] [PATCH] org-remember: Skip creation of the default '* Notes' t


From: Bernt Hansen
Subject: [Orgmode] [PATCH] org-remember: Skip creation of the default '* Notes' task
Date: Thu, 9 Apr 2009 17:19:32 -0400

Remember and refile processing does not require a task.  This change
removes the unneeded default task.

This supports a workflow where new remember tasks and notes go into a
mostly empty file which just has #+FILETAGS: at the top and nothing
else.

This workflow has a minimal number of remember templates
  - one for new tasks and (filed in tasks.org)
  - one for new notes (filed in notes.org)
  - one for phone calls (filed in phone.org)

New tasks are added as top-level tasks to the end of these files and
the #+FILETAGS: REFILE header causes each task to be easy to find.
All tasks in these files are refiled to a more appropriate org file at
a later time.
---
Carsten, (and list)

I've started using this new workflow just this week and org remember insisted
on creating an annoying '* Notes' task before my #+FILETAGS: line since there
were no tasks in the file yet.  I'm refiling as top-level tasks at the end
of the file and the '* Notes' task was just in the way.  I couldn't find any 
good reason to keep this so this patch removes the requirement.  I find tasks
to refile with a custom agenda tag search looking for the tag REFILE and this
change gets rid of the bogus 'Notes' task that kept showing up.

Let me know if I missed some reason you really need this '* Notes' default
task.

-Bernt



 lisp/org-remember.el |    4 ----
 1 files changed, 0 insertions(+), 4 deletions(-)

diff --git a/lisp/org-remember.el b/lisp/org-remember.el
index 6895340..926da74 100644
--- a/lisp/org-remember.el
+++ b/lisp/org-remember.el
@@ -860,10 +860,6 @@ See also the variable `org-reverse-note-order'."
        (save-excursion
          (save-restriction
            (widen)
-           (and (goto-char (point-min))
-                (not (re-search-forward "^\\* " nil t))
-                (insert "\n* " (or (and (stringp heading) heading)
-                                   "Notes") "\n"))
            (setq reversed (org-notes-order-reversed-p))
 
            ;; Find the default location
-- 
1.6.2.2.485.ge37347





reply via email to

[Prev in Thread] Current Thread [Next in Thread]