[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [STUMP] contrib/mpd.lisp database browsing
From: |
Vitaly Mayatskikh |
Subject: |
Re: [STUMP] contrib/mpd.lisp database browsing |
Date: |
Sat, 21 Feb 2009 10:14:54 +0100 |
User-agent: |
Wanderlust/2.15.6 (Almost Unreal) Emacs/22.3 Mule/5.0 (SAKAKI) |
At Sat, 21 Feb 2009 00:27:10 +0100, Morgan Veyret wrote:
> +(defun mpd-menu-action (action-type)
> + (lambda (menu)
> + (declare (ignore menu))
> + (setf *current-menu-input* "")
> + (throw :menu-quit
> + (values action-type
> + (mpd-menu-selected-item menu)))))
> +
...
> -(defun mpd-menu-selected-item (menu)
> - (nth (menu-state-selected menu) (menu-state-table menu)))
--
wbr, Vitaly