Modify org-remember-templates to include a name to show when selecting it

Modify org-remember-templates to include a name to show when selecting it

[Matiyam]

[-- Attachment #1: Type: text/plain, Size: 2576 bytes --]

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 +0000
+++ org.el      2007-10-10 10:05:28 +0000
@@ -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))

--------------------------------------------

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: patch-org-remember-apply-template.txt --]
[-- Type: text/x-diff; name="patch-org-remember-apply-template.txt", Size: 1758 bytes --]

=== modified file 'org.el'
--- org.el	2007-10-10 09:37:27 +0000
+++ org.el	2007-10-10 10:05:28 +0000
@@ -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))



[-- Attachment #3: Type: text/plain, Size: 204 bytes --]

_______________________________________________
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

Re: Modify org-remember-templates to include a name to show when selecting it

[Rainer Stengele]

Matiyam schrieb:
> 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 +0000
> +++ org.el      2007-10-10 10:05:28 +0000
> @@ -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

sounds very useful for me too. Carsten, I vote to include this in the
standard.

rainer

Re: Modify org-remember-templates to include a name to show when selecting it

[Carsten Dominik]

On Oct 10, 2007, at 12:15, Matiyam wrote:

> 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.

The idea is good, but since you insert a new element in the middle of 
the
list, it will break all existing customization of that variable.  I can 
make it internally
compatible if the name is the first thing in each list.

Will be in 5.12.  Thanks.

- Carsten