Hi!
In my setup i have 5 org-remember-templates.
Since my memory is not very good :), i have modified org-remember-templates
to include another element in the list that tells me the name of it.
And then org-remember-apply-template to, when prompting for selecting the
template, show the name along with the keycode.
Something like:
Select template: Work (w) Home (h)
I think the patch is easy enough, so i haven't created a bug.
I hope this helps somebody.
Thanks for org-mode, it's helping me a lot!!!
-- M
---
=== modified file 'org.el'
--- org.el 2007-10-10 09:37:27 +
+++ org.el 2007-10-10 10:05:28 +
@@ -1411,11 +1411,14 @@
(defcustom org-remember-templates nil
Templates for the creation of remember buffers.
When nil, just let remember make the buffer.
-When not nil, this is a list of 4-element lists. In each entry, the first
+When not nil, this is a list of 5-element lists. In each entry, the first
element is a character, a unique key to select this template.
-The second element is the template. The third element is optional and can
+The second element is a string that will appear when you are prompted to
+select which template to use, so it's easier to choose one when you have
+more than a couple of them.
+The third element is the template. The fourth element is optional and can
specify a destination file for remember items created with this template.
-The default file is given by `org-default-notes-file'. An optional forth
+The default file is given by `org-default-notes-file'. An optional fifth
element can specify the headline in that file that should be offered
first when the user is asked to file the entry. The default headline is
given in the variable `org-remember-default-headline'.
@@ -12445,10 +12448,10 @@
(t
(message Select template: %s
(mapconcat
- (lambda (x) (char-to-string (car x)))
+ (lambda (x) (format %s (%s) (cadr x)
(char-to-string (car x
org-remember-templates ))
(read-char-exclusive)
-(entry (cdr (assoc char org-remember-templates)))
+(entry (cddr (assoc char org-remember-templates)))
(tpl (car entry))
(plist-p (if org-store-link-plist t nil))
(file (if (and (nth 1 entry) (stringp (nth 1 entry))
=== modified file 'org.el'
--- org.el 2007-10-10 09:37:27 +
+++ org.el 2007-10-10 10:05:28 +
@@ -1411,11 +1411,14 @@
(defcustom org-remember-templates nil
Templates for the creation of remember buffers.
When nil, just let remember make the buffer.
-When not nil, this is a list of 4-element lists. In each entry, the first
+When not nil, this is a list of 5-element lists. In each entry, the first
element is a character, a unique key to select this template.
-The second element is the template. The third element is optional and can
+The second element is a string that will appear when you are prompted to
+select which template to use, so it's easier to choose one when you have
+more than a couple of them.
+The third element is the template. The fourth element is optional and can
specify a destination file for remember items created with this template.
-The default file is given by `org-default-notes-file'. An optional forth
+The default file is given by `org-default-notes-file'. An optional fifth
element can specify the headline in that file that should be offered
first when the user is asked to file the entry. The default headline is
given in the variable `org-remember-default-headline'.
@@ -12445,10 +12448,10 @@
(t
(message Select template: %s
(mapconcat
- (lambda (x) (char-to-string (car x)))
+ (lambda (x) (format %s (%s) (cadr x) (char-to-string (car x
org-remember-templates ))
(read-char-exclusive)
- (entry (cdr (assoc char org-remember-templates)))
+ (entry (cddr (assoc char org-remember-templates)))
(tpl (car entry))
(plist-p (if org-store-link-plist t nil))
(file (if (and (nth 1 entry) (stringp (nth 1 entry))
___
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
