Re: [STUMP] stumpwm and sbcl, keybindings

[maru dubshinki]

On 10/10/06, Hans Halvorson <address@hidden> wrote:
> Two questions:
>
> 1. I can start stumpwm successfully with cmucl. But when I use sbcl
> (0.9.4), and try:
>
>  (asdf:operate 'asdf:load-op 'stumpwm)
>
> I get the message that the "KBD function" is undefined. What am I
> doing wrong?

kbd is defined in kmap.lisp
Are you sure that is being loaded? Try adding in a (load
"whereever/stumpwm/kmap.lisp")

> 2. I found the stumpwm.texi file as distributed by the Gentoo
>  stumpwm-cvs ebuild. But this has very sparse information about
>  default keybindings, etc.. (e.g. I only discovered by accident
>  that "C-t e" launches emacs.) Is there some place where I can find
>  more information about the default keybindings?
>
> Thanks,
> Hans

re 2: all the default keybindings are defined in user.lisp
As of today, the CVS versions looks a little like this:
(when (null *root-map*)
 (setf *root-map*
       (let ((m (make-sparse-keymap)))
         (define-key m (kbd "c") "exec xterm")
         (define-key m (kbd "C-c") "exec xterm")
         (define-key m (kbd "e") "exec emacs")
         (define-key m (kbd "C-e") "exec emacs")
         (define-key m (kbd "n") "next")
         (define-key m (kbd "C-n") "next")
         (define-key m (kbd "SPC") "next")
         (define-key m (kbd "p") "prev")
         (define-key m (kbd "C-p") "prev")
         (define-key m (kbd "w") "windows")
         (define-key m (kbd "C-w") "windows")
         (define-key m (kbd "k") "delete")

.... etc
It's pretty straightforward, so long as you remember what exec does.

~maru