# -*- mode: fvwm-generic; coding: raw-text-unix -*-
# Edrx, 2005feb20

# All the keybindings of my fvwm configuration. The non-keybinding
# commands are in another file.

# (find-angg ".fvwm/")
# (find-angg ".fvwm/keys.fwvm")
# (find-angg ".fvwm/nokeys.fvwm")
# (find-angg ".fvwm/withkeys.fvwm")

# (find-man "1 fvwm" "-r | --replace")
# (find-man "1 fvwm" "-f config-file\n")
# fvwm -replace -f ~/.fvwm/.fvwm2rc
# fvwm -replace -f ~/.fvwm/all.fvwm &

# (find-angg ".fvwm/edrx-system.fvwm")
# (find-angg ".fvwm/edrx-menus.fvwm")
# (find-angg ".fvwm/edrx.fvwm")

# (find-efile "generic-x.el")
# (progn (require 'generic-x) (fvwm-generic-mode) (font-lock-mode 1))

# «.key-bindings»	(to "key-bindings")
# «.moving-the-cursor»	(to "moving-the-cursor")
# «.meta-arrow»		(to "meta-arrow")
# «.4-v,h,b»		(to "4-v,h,b")
# «.4-f,g»		(to "4-f,g")
# «.numlock»		(to "numlock")





# «key-bindings»  (to ".key-bindings")
# (find-woodyfvwmfile "system.fvwm2rc" "# Section: Key bindings")
# (find-fvwmhelp "Key ")
# A=anywhere, C/M/S=control/meta/shift. See the section on mouse bindings,
# below..
#
# «tab»  (to ".tab")
#
Key Tab   A    M    Next [CurrentPage !iconic] focus-and-raise
Key Tab   A    MS   Prev [CurrentPage !iconic] focus-and-raise
Key Tab   A    CM   Next [CurrentPage] deiconify-and-focus
Key Tab   A    CMS  Prev [CurrentPage] deiconify-and-focus

Key Tab   A    4    Next [CurrentPage !iconic] focus-and-raise

# (find-fvwmhelp "Key Keyname Context Modifiers Function")
# (find-fvwmhelp "Next [(conditions)] command")

Key F1    A    4    Popup Window-Ops
Key F2    A    4    Popup /Debian
Key F3    A    4    Lower
Key F4    A    4    WindowList
Key F5    A    4    Prev
Key F6    A    4    Next
Key F7    A    4    Move
Key F8    A    4    Resize
Key F9    A    4    Iconify
Key F10   A    4    Maximize 100 100
Key F11   A    4    Raise
Key F12   A    4    Stick


# «meta-arrow»  (to ".meta-arrow")
# Key Left  A    M    Scroll -100 +0
# Key Up    A    M    Scroll +0 -100
# Key Right A    M    Scroll +100 +0
# Key Down  A    M    Scroll +0 +100

# Remove the Meta-arrow bindings
# (find-fvwmhelp "Key [(window)] Keyname Context Modifiers Function" "'-'")
# (find-fline "/etc/X11/fvwm/system.fvwm2rc" "Key Left  A    M")

# Key Left  A M -
# Key Up    A M -
# Key Right A M -
# Key Down  A M -

# «moving-the-cursor»  (to ".moving-the-cursor")
# (eeb-fvwm)
# (find-fvwmhelp "Key [(window)] Keyname Context Modifiers Function" "'-'")
# Modifier4 is the left "Windows" key. 
# (eev "xmodmap; xev")

# Moving the cursor a full page: (Anywhere) Mod4-arrowkey
# (find-fvwmhelp "CursorMove horizontal[p] vertical[p]")
Key Left   A  4  CursorMove -100 +0
Key Right  A  4  CursorMove +100 +0
Key Up	   A  4  CursorMove +0 -100
Key Down   A  4  CursorMove +0 +100

# Moving the cursor 64 pixels: (Anywhere) Ctrl-Mod4-arrowkey
Key Left   A C4  CursorMove -64p +0p
Key Right  A C4  CursorMove +64p +0p
Key Up	   A C4  CursorMove +0p -64p
Key Down   A C4  CursorMove +0p +64p

# Moving the cursor 16 pixels: (Anywhere) Ctrl-Shift-Mod4-arrowkey
Key Left   A CS4 CursorMove -16p +0p
Key Right  A CS4 CursorMove +16p +0p
Key Up	   A CS4 CursorMove +0p -16p
Key Down   A CS4 CursorMove +0p +16p

# Moving the cursor 4 pixels: (Anywhere) Shift-Mod4-arrowkey
Key Left   A  S4  CursorMove -4p +0p
Key Right  A  S4  CursorMove +4p +0p
Key Up	   A  S4  CursorMove +0p -4p
Key Down   A  S4  CursorMove +0p +4p



# «4-v,h,b»  (to ".4-v,h,b")
# «4-f,g»  (to ".4-f,g")
# (find-fvwmhelp "Maximize [flags] [bool] [horizontal[p]] [vertical [p]]")

# 4-v - maximize/unmaximize vertically
# 4-h - maximize/unmaximize horizontally
# 4-b - maximize/unmaximize both horizontally and vertically
# 4-f - make the current window "full" (no borders or title bar)

Key v   A  4 Maximize 0 100		   # 4-v: maximize vertically (toggle)
Key h   A  4 Maximize 100 0		   # 4-h: maximize horizontally (toggle)
Key b   A  4 Maximize 100 100		   # 4-b: maximize both ways (toggle)
Key f   A  4 WindowStyle NoTitle, !Borders # 4-f: full (no borders or title bar)
Key g   A  4 WindowStyle Title, Borders	   # 4-g: put back borders and title bar

Key p   A  4 pager-to-bottom               # 4-p:   pager-to-bottom
Key p   A C4 pager-to-top		   # 4-C-p: pager-to-top
Key p   A S4 no-pager			   # 4-S-p: no-pager

Key k   A  4 Popup KeyboardMenu
Key u   A  4 Popup UnclutterMenu

Key x   A C4 Exec xterm
Key x   A S4 Exec xterm -fn 10x20

# To do: classes "Normal" and "Bare"
# so that "xterm -class Bare" would create a borderless window.
# (find-man "7 X")
# (find-fvwmhelp "Style stylename options")



# «numlock»  (to ".numlock")
# (find-es "fvwm" "numlock")

IgnoreModifiers L25