Don't lock the screen on a double scroll lock.

[fvwmconf.git] / common / bindings

diff --git a/common/bindings b/common/bindings
index dd9f2e2b99caf7e80b9f92cc1898325951da3674..afc2962b13401d71416f10e1dca5172207e038a8 100644 (file)
--- a/common/bindings
+++ b/common/bindings
@@ -1,26 +1,20 @@
-# Globalbinds covers these.
-Key Page_Down A CM Nop
-Key Page_Up   A CM Nop
-Key End       A CM Nop
-Key Home      A CM Nop
-Key Insert    A CM Nop
-Key N         A CM Nop
+# MPD shortcuts
+Key Page_Up   A CM Exec exec mpc prev
+Key Page_Down A CM Exec exec mpc next
+Key End       A CM Exec exec mpc stop
+Key Home      A CM Exec exec mpc pause
+Key Insert    A CM Exec exec mpc play
+Key Page_Down A CM Exec exec mpc next
+
+Mouse 4 A CM Exec exec mpc prev
+Mouse 5 A CM Exec exec mpc next
 
 # Window management
 Key F4 A M  Close
-Key F4 A M2 Close
 
 # When programs don't set the resolution...
 Key F12 A C Exec exec xrandr -s 0
 
-# For moving windows around desktops.
-Key J WFT CM DoPageMove 0
-Key K WFT CM DoPageMove 1
-Key L WFT CM DoPageMove 2
-Key U WFT CM DoPageMove 3
-Key I WFT CM DoPageMove 4
-Key O WFT CM DoPageMove 5
-
 # For moving ourself around desktops.
 Key 1 A CM GotoPage 0 0
 Key 2 A CM GotoPage 1 0
@@ -39,10 +33,29 @@ Mouse 5 T N Windowshade False
 # Console
 Key grave A C  Exec exec $[TERMINAL]
 Key grave A CM Exec exec $[TERMINAL] -e zsh -f
-Key F3 A M  Module FvwmConsole -terminal $[TERMINAL]
-Key F3 A M2 Module FvwmConsole -terminal $[TERMINAL]
+Key F3 A M  Module FvwmConsole -terminal urxvt
+
+# Screen locking.  Since a double scroll lock is used to communicate with the
+# KVM, take some care to only lock the screen if the scroll lock key is pressed
+# once.
+DestroyFunc FinishLock
+AddToFunc   FinishLock
+ + I Key Scroll_Lock A A LockScreen
+ + I $*
+
+DestroyFunc LockScreen
+AddToFunc   LockScreen
+ + I Schedule 750 FinishLock Exec exec xscreensaver-command -lock
+ + I Key Scroll_Lock A A FinishLock Deschedule $[schedule.last]
+
+Key Scroll_Lock A A LockScreen
 
 DestroyFunc DoPageMove
 AddToFunc   DoPageMove
 + I GotoPage   $0 0
 + I MoveToPage $0 0
+
+# Keymap config
+PipeRead "[ -f '$[FVWM_USERDIR]/common/keymaps/$[KEYMAP]' ] \
+          && echo Read common/keymaps/$[KEYMAP] \
+         || echo Read common/keymaps/default"