Re: HELP: One Bindkey for Two Different Commands

[Stefan Monnier]

> Unfortunately,  this very simple idea doesn't seem to work for me.
> Here's what I have in my .emacs so far:

> (defun ya-ya ()
>   (if (cdr (window-list))
>       'other-window
>     'switch-to-buffer))

> (global-set-key "\M-o" (ya-ya))

> Any ideas how this might be accomplished?


How 'bout some neat hack like:

  (global-set-key "\M-o" '(menu-item "Foo" bar
                           :filter (lambda (x) (if (cdr (window-list))
                                                   'other-window
                                                 'switch-to-buffer))))

-- Stefan ;-)