summaryrefslogtreecommitdiffstats
path: root/blog/blog-2012-05-02-2109.org
diff options
context:
space:
mode:
authorGravatar Tom Willemsen2013-01-18 23:23:02 +0100
committerGravatar Tom Willemsen2013-01-18 23:23:02 +0100
commitb4928633d8f4fb0638acef78142b08abd866d9d9 (patch)
tree06c63aff0fe344bf83da0e596f223b6cbb1fdf29 /blog/blog-2012-05-02-2109.org
parentfc57f091501071cf5fadd327480aa67338cac88e (diff)
downloadorgweb-b4928633d8f4fb0638acef78142b08abd866d9d9.tar.gz
orgweb-b4928633d8f4fb0638acef78142b08abd866d9d9.zip
Delete blog, move project
Diffstat (limited to 'blog/blog-2012-05-02-2109.org')
-rw-r--r--blog/blog-2012-05-02-2109.org41
1 files changed, 0 insertions, 41 deletions
diff --git a/blog/blog-2012-05-02-2109.org b/blog/blog-2012-05-02-2109.org
deleted file mode 100644
index defa8dd..0000000
--- a/blog/blog-2012-05-02-2109.org
+++ /dev/null
@@ -1,41 +0,0 @@
-#+TITLE: Ask for selection in emacs
-#+DESCRIPTION: Something I came across
-
-I came across an email on one of the emacs mailing lists today, where
-someone asked how to ask a user for input whilst providing
-completions. The first answer he got was to try ~tmm-prompt~, so I
-looked into it a little.
-
-I use ~mu4e~ as my primary email program, but since it isn't designed
-(seemingly) for use with multiple accounts I've got some wrapper
-functions that set some variables according to my liking and then
-start ~mu4e~. This works very well, but it's a pain to have to use
-~M-x view-ryu-mail~ or ~M-x view-ninthfloor-mail~ and such, so I wrote
-a function to read a string from the minibuffer, which I then bound to
-the ~<XF86Mail>~ key, this turned it into, for example ~<XF86Mail>
-ryu~ and ~<XF86Mail> ninthfloor~ and so on, but this doesn't have any
-completion or notification of my options.
-
-So after looking at ~tmm-prompt~ I came up with the following:
-
-#+BEGIN_SRC emacs-lisp
-(defvar oni:mailbox-map
- '(("ryulash.org" . "ryu")
- ("ninthfloor" . "ninthfloor"))
- "A mailbox map for use with `tmm-prompt'.")
-
-(defun view-ryu-mail ()...)
-(defun view-ninthfloor-mail ()...)
-
-(defun view-mu ()
- (interactive)
- (let* ((tmm-completion-prompt "Choose a mailbox\n")
- (inbox (tmm-prompt oni:mailbox-map)))
- (funcall (intern (concat "view-" inbox "-mail")))))
-#+END_SRC
-
-I've left out the definitions and some mail accounts for brevity.
-
-~tmm-prompt~ is usually used when using the text-mode menu with ~M-`~,
-but it works very well here too. This changes mailbox selection to,
-for example ~<XF86Mail> r~ or ~<XF86Mail> n~.