Re: sawfish 0.33.1 broken?

[Colin Watson <cjw44@flatline.org.uk>]

On Sun, 26 Nov 2000 at 15:37:54 -0500, safemode wrote:

[As I said in my last mail, *please do not Cc: me on list mail*. I read
debian-devel, or else I wouldn't have replied to your mail in the first
place!]

> > # To install Debian menu with popup-root-menu put these lines in your
> > # ~/.sawfishrc
> > # 
> > #   (require 'debian-menu)
> > #   (setq apps-menu debian-menu)
> 
> If i do that, i get lisp closure errors and cant access the menu at all.

Could we please have some more detail? Quoting the error message would
be favourite.

  http://www.chiark.greenend.org.uk/~sgtatham/bugs.html

> This all worked before without a stupid .sawfishrc file ...now
> everything is gone to hell.

I must admit that I'm not overly fond of the "doesn't work by default"
configuration in 0.33.1-1.

For what it's worth, I've attached my .sawfishrc and .sawfish/menus.jl
files (in my .xsession I start sawfish with 'exec sawfish -l
~/.sawfish/menus.jl'). If those don't work for you, you should (a) go to
debian-user and look for help there, and (b) file a bug against the
sawfish package with the text of the errors you see when you follow the
directions in README.Debian.

-- 
Colin Watson                                     [cjw44@flatline.org.uk]

; -*- Lisp -*-

(require 'sawmill-defaults)

(setq menu-program-stays-running t)

(require 'debian-menu)
(setq apps-menu debian-menu)

(defun launch-xterm () "Launch an xterm" (interactive)
 (system "x-terminal-emulator -vb &"))

(bind-keys global-keymap "A-F1" 'launch-xterm)
(bind-keys root-window-keymap "Button1-Click2" 'launch-xterm)

(bind-keys root-window-keymap "Button3-Click1" 'popup-root-menu)
(unbind-keys root-window-keymap "Button2-Click1")

; Local Sawmill menu definitions. Load with the -l command-line option to get
; around the main menu definitions zapping things from .sawmillrc.

(require 'menus)

(defun launch-xterm () "Launch an xterm" (interactive)
 (system "x-terminal-emulator -vb &"))

(setq root-menu
  `(("Xterm" launch-xterm)
    ("gvim" (system "/usr/bin/gvim &"))
    ("Netscape" (system "/usr/bin/X11/netscape &"))
    ("Mozilla" (system "/usr/bin/mozilla &"))
    ("irssi-gtk" (system "/usr/bin/irssi-gtk &"))
    ("licq" (system "/usr/bin/licq &"))
    ("gqview" (system "/usr/bin/gqview &"))
    ("gqmpeg" (system "/usr/bin/gqmpeg &"))
    ()
    ("UK keymap" (system "/usr/bin/X11/setxkbmap gb &"))
    ("Swedish keymap" (system "/usr/bin/X11/setxkbmap se &"))
    ()
    ("Apps" . debian-apps-menu)
    ("Games" . debian-games-menu)
    ("Help" . debian-help-menu)
    ("Screen" . debian-screen-menu)
    ("WindowManagers" . debian-windowmanagers-menu)
    ("XShells" . debian-xshells-menu)
    ()
    ("Customize" . custom-menu)
    ("Windows" . window-menu)
    ()
    ("Restart" restart)
    ("Quit" quit)))