Re: Sawfish - eigene Menüs

[Matthias Fechner <idefix@fechner.net>]

Hallo Torsten,

* Torsten Krueger <torsten@kryger.de> [16-09-02 22:00]:
> Dann kommt bei mir ein
> 
> (defvar user-menu
> ...

So, hab es versucht, aber es ging nicht, hab dann mal ein bischen
rumgesucht und hab es jetzt zum laufen bekommen:

(require 'sawmill-defaults)
(require 'sawfish.wm.menus)

(defvar ssh-pre-menu
  (list
     '("Server" (system "xterm -e ssh -6 s&"))
     '("Fechner" (system "xterm -e ssh -6 f&"))
     '("Alpha" (system "xterm -e ssh c&"))
     '()
     '("XEmacs" (system "xemacs &"))
     '("Galeon" (system "galeon &"))
     )
  )
			 
(defun popup-ssh-menu ()
   "Display SSH Menu."
   (interactive)
   (popup-menu ssh-pre-menu))
			       
-- 
Gruss
Matthias