org remember anything

org remember anything

[Hugo Schmitt]

[-- Attachment #1.1: Type: text/plain, Size: 898 bytes --]

Hi.
So, just wrote this and maybe there are others users of Anything.el around:
Just update your anything-sources variable to include anything-org-remember.

Maybe this will get more useful for people that have 10+ templates and not
enough meaninful keys.

- Hugo

Ps: if there is a better way of achieving `list-of-fst` please tell me. I
find it a little odd...

---
(defun list-of-nth (list pos)
  (mapcar (lambda (x) (nth pos x)) list))

(defun list-of-fst (list) (list-of-nth list 0))

(setq anything-org-remember
      '((name . "Org Remember")
        (candidates . (lambda () (list-of-fst org-remember-templates)))
        (action . (lambda (name)
                    (let* ((orig-template org-remember-templates)
                           (org-remember-templates
                            (list (assoc name orig-template))))
                      (call-interactively 'org-remember))))))

[-- Attachment #1.2: Type: text/html, Size: 1445 bytes --]

[-- Attachment #2: 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