>>>>> "SM" == Serge Matveev <[EMAIL PROTECTED]> writes:
SM> Не кинет ли в меня кто-нибудь фаликом .sawfishrc в котором
SM> бы заменялось app-menu и запускалась хоть какая-нибудь прога
SM> по некому hot-key (в качестве образца). Честное слово неохото
SM> с лиспом разбираться из-за такой ерунды :-(((
Это то ?
====
(setq load-path (cons "~/.sawfish/" load-path))
(setq load-path (cons "/etc/X11/sawfish" load-path))
(setq workspace-names '("XMMS" "Misc" "XEmacs" "Gnus" "Netscape" "other" ))
(require 'ws-num)
(require 'debian-menu)
(setq apps-menu debian-menu)
(add-hook 'enter-workspace-hook ijc-workspace-hook)
(bind-keys global-keymap
"C-A-1" 'select-workspace:1
"C-A-2" 'select-workspace:2
"C-A-3" 'select-workspace:3
"C-A-4" 'select-workspace:4
"C-A-5" 'select-workspace:5
"C-A-6" 'select-workspace:6
"C-A-7" 'select-workspace:7
"C-A-8" 'select-workspace:8
"C-A-9" 'select-workspace:9
"C-A-Insert" '(system "/usr/X11R6/bin/rxvt-xpm -ls +sb +ip -bg
black -cr green -fg white -C -sl 500 -font
'-cronyx-courier-bold-r-normal-*-*-100-*-*-m-*-koi8-r' -geometry 80x43+0+0 &")
; "C-A-Insert" '(system "/usr/X11R6/bin/rxvt-xpm -ls +sb +ip -bg
black -cr green -fg white -C -sl 500 -font
-cronyx-fixed-bold-r-normal-*-*-120-*-*-c-*-koi8-r -geometry 92x46+0+0 &")
"C-A-n" '(system "navigator &")
"C-A-e" '(system "LANG=C xemacs21 &")
"C-A-m" '(system "tkman")
"Pause" '(system "/usr/bin/X11/xscreensaver-command -lock"))
--
Mon at moon.mon
Today is Pungenday, the 23rd day of Chaos in the YOLD 3167
