[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Orgmode] [Patch] New implementation of the Org remember process rea
From: |
Sebastian Rose |
Subject: |
Re: [Orgmode] [Patch] New implementation of the Org remember process ready for comments and testing |
Date: |
Wed, 23 Jun 2010 01:32:28 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.0.50 (gnu/linux) |
Sebastian Rose <address@hidden> writes:
> * Separate template files
>
> I'd like to use Org-mode to edit templates.
>
> I'm trying this:
>
> (setq org-capture-templates
> (
> `(
> ("l" "Lauf" entry (file+headline "notes/Laufen/Training.org"
> "Training")
> ,(org-file-contents "~/emacs/org/capture-templates/training.org")
> :empty-lines 1))))
>
> But I get an error when calling `org-capture':
Here is a patch that would do:
diff --git a/lisp/org-capture.el b/lisp/org-capture.el
index 32db517..dfc7bb1 100644
--- a/lisp/org-capture.el
+++ b/lisp/org-capture.el
@@ -794,6 +794,8 @@ Point will remain at the first line after the inserted
text."
(org-capture-put :key (car entry) :description (nth 1 entry)
:target (nth 3 entry))
(let ((txt (nth 4 entry)) (type (or (nth 2 entry) 'entry)))
+ (when (file-exists-p txt)
+ (setq txt (org-file-contents txt)))
(when (or (not txt) (not (string-match "\\S-" txt)))
;; The template may be empty or omitted for special types.
;; Here we insert the default templates for such cases.
Now I could use this:
(setq org-capture-templates
(quote
(("l" "Lauf" entry (file+headline "notes/Laufen/Training.org" "Training")
"~/emacs/org/capture-templates/training.org"
:empty-lines 1))))
This patch ignores a possible clash headline <=> filename.
Sebastian
Re: [Orgmode] New implementation of the Org remember process ready for comments and testing, Puneeth, 2010/06/23