.fvwm/main.m4

   1 ##########################################################################
   2 # FVWM - F? Virtual Window Manager, Version 2.x (fvwm2) Configuration File
   3 #
   4
   5 dnl The file is in m4 format, use FvwmM4 module to read it
   6 dnl like this: ModuleSynchronous FvwmM4 -lock .fvwm2rc
   7
   8 dnl This is to prevent FvwmM4 to shadow $HOME
   9 undefine(`HOME')
  10
  11 dnl Echo dimension
  12 `#' width = WIDTH
  13
  14 divert(-1)
  15 dnl koi8-r Fonts
  16 dnl define(`SMALL_FONT_KOI8', `-*-fixed-medium-r-normal-*-*-100-*-*-*-*-koi8-r')
  17 dnl define(`MEDIUM_FONT_KOI8', `-*-fixed-medium-r-normal-*-*-120-*-*-*-*-koi8-r')
  18 dnl define(`BIG_FONT_KOI8', `-*-fixed-medium-r-normal-*-*-140-*-*-*-*-koi8-r')
  19
  20 dnl cp1251 Fonts
  21 dnl define(`SMALL_FONT_CP1251', `-*-fixed-medium-r-normal-*-*-100-*-*-*-*-*-cp1251')
  22 dnl define(`MEDIUM_FONT_CP1251', `-*-fixed-medium-r-normal-*-*-120-*-*-*-*-*-cp1251')
  23 dnl define(`BIG_FONT_CP1251', `-*-fixed-medium-r-normal-*-*-140-*-*-*-*-*-cp1251')
  24
  25 dnl define(`XBUFFY_FONT', `-cronyx-helvetica-bold-r-*-*-*-100-*-*-*-*-koi8-r')
  26
  27
  28 dnl TrueType Fonts
  29 define(`VERY_SMALL_FONT', `xft:Sans:size=10')
  30 define(`SMALL_FONT', `xft:Sans:size=12')
  31 define(`MEDIUM_FONT', `xft:Sans:size=14')
  32 define(`BIG_FONT', `xft:Sans:size=16')
  33 define(`LARGE_FONT', `xft:Sans:size=18')
  34 define(`HUGE_FONT', `xft:Sans:size=20')
  35
  36 dnl Bold TT fonts
  37 define(`SMALL_BOLD_FONT', SMALL_FONT`:Bold')
  38 define(`MEDIUM_BOLD_FONT', MEDIUM_FONT`:Bold')
  39 define(`BIG_BOLD_FONT', BIG_FONT`:Bold')
  40
  41 define(`TITLE_FONT', MEDIUM_FONT)
  42 define(`ICON_FONT', LARGE_FONT)
  43
  44 dnl Font and geometry aliases that depend on whether the screen resolution is
  45 dnl 800x600, 1024x768 or 1920x1200
  46
  47 define(`PAGER_GEOM',
  48 ifelse(eval(WIDTH < 1024), 1, `365x100+0+0',
  49        eval(WIDTH < 1920), 1, `365x100+0+0', `600x160+0+0'))
  50
  51 define(`SMALL_PAGER_FONT', ifelse(eval(WIDTH < 1920), 1, VERY_SMALL_FONT, SMALL_FONT))
  52 define(`PAGER_FONT', ifelse(eval(WIDTH < 1920), 1, SMALL_FONT, BIG_FONT))
  53 define(`BUTTONS_FONT', PAGER_FONT)
  54
  55
  56 define(`MENU_FONT',
  57 ifelse(eval(WIDTH < 1024), 1, `xft:Sans:size=16',
  58        eval(WIDTH < 1920), 1, `xft:Sans:size=18', `xft:Sans:size=22'))
  59 define(`IDENT_FONT', MENU_FONT)
  60 define(`WIN_LIST_FONT', MENU_FONT)
  61 define(`ICON_BOX_FONT', MENU_FONT)
  62
  63
  64 dnl XSetBg message width and font
  65 define(`TEXT_WIDTH',
  66 ifelse(eval(WIDTH < 1024), 1, 70,
  67        eval(WIDTH < 1920), 1, 75, 80))
  68
  69 define(`MESSAGE_FONT', `Nimbus Sans L 18')
  70
  71
  72 dnl Terminal emulator
  73 define(`TERM_GEOM',
  74 ifelse(eval(WIDTH < 1024), 1, `80x25',
  75        eval(WIDTH < 1920), 1, `80x30', `80x32'))
  76
  77 define(`TERM_GEOM_BOTLT', TERM_GEOM`+0-0')
  78 define(`TERM_GEOM_BOTRT', TERM_GEOM`-0-0')
  79
  80 define(`TERM_GEOM_BIG',
  81 ifelse(eval(WIDTH < 1024), 1, `96x30',
  82        eval(WIDTH < 1920), 1, `112x32+2-0', `126x35'))
  83
  84
  85 define(`TERM', `urxvt')
  86 define(`TERM_KOI8', `Exec LC_CTYPE=ru_RU.KOI8-R exec TERM')
  87 define(`TERM_UTF8', `Exec exec "$HOME"/lib/X11/utf8rxvt')
  88 define(`TERM_KOI8_BOTLT', `TERM_KOI8 -geometry TERM_GEOM_BOTLT')
  89 define(`TERM_UTF8_BOTLT', `TERM_UTF8 -geometry TERM_GEOM_BOTLT')
  90 define(`TERM_KOI8_BOTRT', `TERM_KOI8 -geometry TERM_GEOM_BOTRT')
  91 define(`TERM_UTF8_BOTRT', `TERM_UTF8 -geometry TERM_GEOM_BOTRT')
  92
  93
  94 define(`REMOTE_HOST_KOI8',
  95 `TERM_KOI8 -title "$2" -n "$2" -e ssh -4 "$1"')
  96
  97 define(`REMOTE_HOST_KOI8_MENU',
  98 "$2 (koi8)" REMOTE_HOST_KOI8($1, $2))
  99
 100 define(`REMOTE_HOST_KOI8_BOTLT',
 101 TERM_KOI8_BOTLT -title "$2" -n "$2" -e ssh -4 "$1")
 102
 103 define(`REMOTE_HOST_KOI8_BOTRT',
 104 `TERM_KOI8_BOTRT -title "$2" -n "$2" -e ssh -4 "$1"')
 105
 106 define(`REMOTE_HOST_KOI8_BOTLT_MENU',
 107 "$2 (koi8,btlt)" REMOTE_HOST_KOI8_BOTLT($1, $2))
 108
 109 define(`REMOTE_HOST_KOI8_BOTRT_MENU',
 110 "$2 (koi8,btrt)" REMOTE_HOST_KOI8_BOTRT($1, $2))
 111
 112 define(`REMOTE_HOST_UTF8',
 113 TERM_UTF8 -e ssh -4 "$1")
 114
 115 define(`REMOTE_HOST_UTF8_MENU',
 116 "$2 (utf8)" REMOTE_HOST_UTF8($1, $2))
 117
 118 define(`REMOTE_HOST_UTF8_BOTLT',
 119 TERM_UTF8_BOTLT -e ssh -4 "$1")
 120
 121 define(`REMOTE_HOST_UTF8_BOTRT',
 122 TERM_UTF8_BOTRT -e ssh -4 "$1")
 123
 124 define(`REMOTE_HOST_UTF8_BOTLT_MENU',
 125 "$2 (utf8,btlt)" REMOTE_HOST_UTF8_BOTLT($1, $2))
 126
 127 define(`REMOTE_HOST_UTF8_BOTRT_MENU',
 128 "$2 (utf8,btrt)" REMOTE_HOST_UTF8_BOTRT($1, $2))
 129
 130 define(`REMOTE_HOST_KOI8_BIG',
 131 TERM_KOI8 -geometry TERM_GEOM_BIG -title "$2" -n "$2" -e ssh -4 "$1")
 132
 133 define(`REMOTE_HOST_KOI8_BIG_MENU',
 134 "$2 (koi8)" REMOTE_HOST_KOI8_BIG($1, $2))
 135 divert
 136
 137 ##########################################################################
 138 # PATH Setup
 139 #
 140 # Colon seperated unix directory paths for Modules, xpm files, and bitmaps
 141 #ModulePath /usr/lib/fvwm
 142 ImagePath /usr/share/pixmaps/fvwm:/usr/share/pixmaps:/usr/include/X11/bitmaps #:/usr/local/firefox/chrome/icons/default:/usr/local/firefox/icons
 143
 144 ############################################################################
 145 # COLORS and FONTS
 146 #
 147 # Set the fore and back border colors for the window that has focus
 148 Style * HilightFore Black, HilightBack #c06077
 149
 150 # Set fore/back border colors for all other windows
 151 Style * Color Black/#60a0c0
 152
 153 # Set colors/font for pop-up menus
 154 # Syntax: MenuStyle forecolor backcolor shadecolor font style(fvwm/mwm)
 155 MenuStyle * FVWM, Foreground Black, Background grey, Greyed SlateGrey, Font MENU_FONT
 156
 157 # Set fonts to use on title bar and icon label
 158 Style * Font              TITLE_FONT
 159
 160 ############################################################################
 161 # ICON Setup
 162 #
 163 # If you don't want icons for some or all windows (or all of them!)
 164 # Style * !Icon
 165
 166 # If you want ALL icons to follow you around the desktop (Sticky)
 167 #Style * StickyIcon
 168
 169 # Auto Place Icons is a nice feature (Left Top Right Bottom)
 170 #Style * IconBox 10 -75 -10 -0
 171
 172 Style * IconFont          ICON_FONT
 173
 174 ############################################################################
 175 # FOCUS Setup
 176 #
 177 # Does the window with focus control the colormap, or the one under the mouse
 178 ColormapFocus FollowsMouse
 179
 180 # Uncomment this to force you to click in a window to give it focus
 181 #Style * ClickToFocus
 182
 183 # default: focus follows mouse
 184 #Style * MouseFocus
 185 #Style * FocusFollowsMouse
 186
 187 # If you knock your mouse out of the term, it keeps focus while in root window
 188 Style *           SloppyFocus
 189
 190 ############################################################################
 191 # MISC Setup
 192 #
 193 # click/release must occur in <n milliseconds to be a "click"
 194 ClickTime 250
 195
 196 # if the window occupies less than n% of the screen, draw it opaque
 197 OpaqueMoveSize 100
 198
 199 # Do not flip pages on the edge of the screen, but allow to move windows
 200 EdgeScroll 0 0
 201 EdgeResistance 10000
 202 Style * EdgeMoveDelay 500
 203 Style * EdgeMoveResistance 100
 204
 205 # MWM Emulation: Don't ignore hints for functions and transient decoration
 206 #Style * MWMFunctions, MWMDecor, MWMButtons, MWMMenus
 207 Style * MWMFunctions, MWMDecor, MWMButtons
 208
 209 # Changes the look of the "rubberband" you see when moving windows (0 - 255)
 210 XORvalue 80
 211
 212 ###########################################################################
 213 # PAGER Setup
 214 #
 215 # set the desk top size in units of physical screen size (width x height)
 216 DesktopSize 2 2
 217
 218 ############################################################################
 219 # WINDOW Placement
 220 #
 221 Style * PositionPlacement Center
 222
 223 ############################################################################
 224 # STYLE Flag Setup
 225 #
 226 # (decorations and window options)
 227 # Note: Order is important!! If compatible styles are set, styles are ORed
 228 # together. If conflicting styles are set, the last one specified is used.
 229
 230 # change the default width, set a global icon, and give borders to popups
 231 Style * BorderWidth 5, HandleWidth 5, Icon unknown1.xpm
 232 Style * DecorateTransient, ClickToFocusRaisesOff
 233
 234 Style "Fvwm*"           !Title, Sticky, WindowListSkip
 235 Style "FvwmButtons"     !Handles, BorderWidth 0, Layer 2
 236 Style "FvwmPager"       Layer 2
 237
 238 # Terminals
 239 Style "*term"           Icon term.xpm
 240 Style "*rxvt"           Icon term.xpm
 241 Style "term-im-local"   Icon pidgin-menu.xpm
 242 Style "term-im-remote"  Icon rcalc2.xpm
 243 Style "term-im-*"       IconBox 630 -75 -2 -2, IconGrid 200 80
 244 Style "term-im-*"       StartsOnPage 1 1 0, StartIconic
 245
 246 # Browsers' windows
 247 Style "Certificate Manager" PositionPlacement Center
 248 Style "*Downloads"      PositionPlacement 50-50w +5
 249 Style "*Mozilla*"       PositionPlacement +0 -0
 250
 251 Style "*Chromium*"      PositionPlacement +0 -0
 252
 253 # IM
 254 Style "Gajim"           PositionPlacement +0 -0
 255 Style "* - Gajim"       MinOverlapPercentPlacement
 256 # Pidgin
 257 Style "Buddy List"      PositionPlacement +0 -0
 258 Style "*Pidgin*"        MinOverlapPercentPlacement
 259
 260 # (S)MPlayer
 261 Style "*MPlayer*"       Layer 6, PositionPlacement 350p 100p
 262
 263 Style "*clock"          !Title, Sticky, WindowListSkip, Color Black/#40c040, NeverFocus, PositionPlacement 50-50w +1p, Layer 2
 264 Style "emacs"           NoPPosition
 265 Style "gxmessage"       PositionPlacement 50-50w +20
 266 Style "*lock"           !Title, Sticky, WindowListSkip
 267 Style "Mosaic"          NoPPosition
 268 Style "xbiff"           Icon mail1.xpm, !Title, Sticky, WindowListSkip
 269 Style "xcalc"           Icon xcalc.xpm
 270 Style "xconsole"        !Title, Sticky, WindowListSkip, NeverFocus
 271 Style "xload"           !Title, Sticky, WindowListSkip, NeverFocus
 272 Style "xman"            Icon xman.xpm
 273 Style "xmh"             Icon mail2.xpm
 274 Style "xsession"        !Title, Sticky, WindowListSkip, ClickToFocus
 275 Style "XXkb"            !Title, !Borders, Sticky, WindowListSkip, Layer 5
 276
 277 ############################################################################
 278 # BUTTON Setup
 279 #
 280
 281 ## Buttons actually being used (duplicated below)
 282 # small up triangle
 283 #ButtonStyle 2 4 50x35@1 65x65@0 35x65@0 50x35@1
 284 # small down triangle
 285 #ButtonStyle 4 4 50x65@1 35x35@1 65x35@1 50x65@0
 286 # Stylized X
 287 #ButtonStyle 3 16 20x20@1 30x20@1 50x40@1 70x20@1 80x20@1 80x30@0 60x50@0 80x80@0 70x80@0 50x60@0 30x80@0 20x80@0 20x70@0 40x50@1 20x30@0 20x20@1
 288
 289 ## Triangles
 290 #
 291 # Small up Triangle
 292 # ButtonStyle * 4 50x35@1 65x65@0 35x65@0 50x35@1
 293 # Small down Triangle
 294 #ButtonStyle * 4 50x65@1 35x35@1 65x35@1 50x65@0
 295 # Large up Triangle
 296 #ButtonStyle 6 4 50x25@1 75x75@0 25x75@0 50x25@1
 297 # Large down Triangle
 298 #ButtonStyle 8 4 50x75@1 25x25@1 75x25@1 50x75@0
 299
 300 ## Boxes
 301 #
 302 # Big Box
 303 ButtonStyle 4 5 25x25@1 25x75@1 75x75@0 75x25@0 25x25@1
 304 # Little Box
 305 ButtonStyle 5 5 40x40@1 60x40@1 60x60@0 40x60@0 40x40@1
 306 # Tall Box
 307 #ButtonStyle 7 5 40x25@1 60x25@1 60x75@0 40x75@0 40x25@1
 308 # Dot
 309 #ButtonStyle 5 5 45x45@1 55x45@1 55x55@0 45x55@0 45x45@1
 310 # Big Box with arrow (left-up to right-down) to little box (iconify)
 311 #ButtonStyle 6 14 20x20@1 20x70@1 70x70@0 70x20@0 20x20@1 60x60@0 60x50@0 60x60@0 50x60@0 60x60@0 60x80@0 80x80@0 80x60@0 60x60@0
 312 # Big Box with arrow (right-up to left-down) to little box (iconify)
 313 ButtonStyle 6 14 70x20@0 70x70@0 20x70@1 20x20@1 70x20@1 30x60@0 30x50@0 30x60@0 40x60@0 30x60@0 30x80@0 10x80@0 10x60@0 30x60@0
 314
 315 ## X's
 316 #
 317 # Standard X
 318 #ButtonStyle 3 17 20x20@1 30x20@1 50x40@1 70x20@1 80x20@1 80x30@0 60x50@0 80x70@1 80x80@0 70x80@0 50x60@0 30x80@0 20x80@0 20x70@0 40x50@1 20x30@0 20x20@1
 319 ButtonStyle 2 17 20x20@1 30x20@1 50x40@1 70x20@1 80x20@1 80x30@0 60x50@0 80x70@1 80x80@0 70x80@0 50x60@0 30x80@0 20x80@0 20x70@0 40x50@1 20x30@0 20x20@1
 320 # Funky X
 321 #ButtonStyle 3 13 26x29@1 34x21@1 50x35@1 70x21@1 79x29@1 63x48@0 79x65@1 70x75@0 50x61@0 34x75@0 26x65@0 44x48@1 26x29@0
 322 # Stylized X
 323 #ButtonStyle 3 16 20x20@1 30x20@1 50x40@1 70x20@1 80x20@1 80x30@0 60x50@0 80x80@0 70x80@0 50x60@0 30x80@0 20x80@0 20x70@0 40x50@1 20x30@0 20x20@1
 324
 325 ## Lightning Bolts
 326 #
 327 # Small Lightning Bolt (skinny at both ends)
 328 #ButtonStyle 5 7 70x15@0 30x55@1 50x55@0 40x85@1 80x45@0 60x45@1 70x15@0
 329 # Big Lighting Bolt (Fat at top, comes to a point)
 330 #ButtonStyle 6 8 35x15@1 20x50@1 40x50@0 30x80@1 75x40@0 50x40@1 75x15@0 35x15@1
 331
 332 ## Miscellaneous Buttons
 333 #
 334 # Nested Right Angles (looks kinda crappy)
 335 #ButtonStyle 5 13 10x0@1 80x0@1 80x10@1 80x80@0 0x80@0 0x60@1 10x65@1 70x65@0 70x0@0 55x0@1 55x10@1 55x55@0 10x55@0
 336 # Nested Right Angles (looks nice)
 337 #ButtonStyle 6 14 0x0@1 0x20@1 20x20@0 20x0@0 0x0@1 0x25@1 25x25@1 25x0@1 55x0@1 55x55@0 0x55@0 0x60@1 60x60@1 60x0@1
 338 # 4 Horizontal bars (sticky)
 339 #ButtonStyle 7 12 10x23@0 90x23@0 90x28@0 10x28@1 10x47@1 90x47@0 90x52@0 10x52@1 10x70@2 90x70@0 90x76@0 10x76@1
 340 ButtonStyle 3 12 10x23@0 90x23@0 90x28@0 10x28@1 10x47@1 90x47@0 90x52@0 10x52@1 10x70@2 90x70@0 90x76@0 10x76@1
 341 # Expanding Windows (iconify -- looks NICE)
 342 #ButtonStyle 8 16 60x40@1 60x80@0 15x80@0 15x40@1 60x40@1 40x40@1 40x25@1 75x25@1 75x60@0 60x60@0 75x60@0 75x40@0 85x40@0 85x15@0 60x15@1 60x25@1
 343
 344 ## Arrows Galore
 345 #
 346 # Up Arrow
 347 #ButtonStyle 3 8 40x80@1 40x50@1 20x50@1 50x20@1 80x50@0 60x50@0 60x80@0 40x80@0
 348 # Down Arrow
 349 #ButtonStyle 3 8 40x20@1 40x50@1 20x50@1 50x80@1 80x50@0 60x50@0 60x20@0 40x20@1
 350 # Left arrow  ( <- )
 351 #ButtonStyle 7 8 80x40@1 50x40@1 50x20@1 20x50@1 50x80@0 50x60@0 80x60@0 80x40@0
 352 # Right arrow ( -> )
 353 #ButtonStyle 8 8 20x40@1 50x40@1 50x20@1 80x50@1 50x80@0 50x60@0 20x60@0 20x40@1
 354 # Horizontal Line with arrowheads on left and right ( <-> )
 355 #ButtonStyle * 12 10x50@1 35x25@1 35x40@1 65x40@1 65x25@1 90x50@1 65x75@0 65x60@0 35x60@0 35x75@0 10x50@0 10x50@1
 356 # Vertical Line with arrowheads on top and bottom
 357 #ButtonStyle * 12 50x10@1 25x35@1 40x35@1 40x60@1 25x60@1 50x85@1 75x60@0 60x60@0 60x35@0 75x35@0 50x10@0 50x10@1
 358 # Diagonal Line with arrowheads on top and bottom ( / )
 359 #ButtonStyle 5 11 80x15@1 45x15@1 55x25@1 25x55@1 15x45@1 15x80@1 50x80@0 40x70@0 70x40@0 80x50@0 80x15@0
 360 # Diagonal Line with arrowheads on top and bottom ( \ )
 361 #ButtonStyle 6 12 55x15@0 45x25@0 75x55@0 85x45@0 85x80@0 50x80@0 60x70@1 30x40@1 20x50@1 20x15@1 55x15@1 55x15@0
 362 #
 363 # the number "2"
 364 #ButtonStyle 8 12 80x80@0 22x80@0 80x40@0 70x25@0 30x25@0 20x35@0 20x30@1 30x20@1 70x20@1 80x30@1 20x75@1 80x75@1
 365
 366 ############################################################################
 367 # MOUSE Setup
 368 #
 369 # First, the root window. Button 1 brings up the Main Menu. B2 is the
 370 # window operations list, and B3 is the winlist module
 371 #     Button    Context Modifi  Function
 372 Mouse 1         R       A       Menu RootMenu Nop
 373 Mouse 2         R       A       Menu Window-Ops Nop
 374 Mouse 3         R       A       WindowList
 375
 376 # Now, title bar buttons
 377 # Left button is the Window-Ops2 menu
 378 #     Button    Context Modifi  Function
 379 Mouse 0         1       A       Menu Window-Ops2 Close
 380 Mouse 0         3       A       Stick
 381 Mouse 0         5       A       Center
 382 # Right buttonsare iconify/maximize, rightmost is close
 383 Mouse 0         2       A       Close
 384 Mouse 0         4       A       Maximize toggle
 385 Mouse 0         6       A       Iconify
 386
 387 # Button 1 in Frame or Sides is a resize-or-raise, in Icons is a move or
 388 # de-iconify, and on Top does a move-or-raise
 389 #     Button    Context Modifi  Function
 390 Mouse 1         F       A       Resize-or-Raise
 391 Mouse 1         S       A       Move-or-Raise
 392 Mouse 1         I       A       Move-or-Iconify
 393 #Mouse 1                T       A       Move-or-Raise
 394 Mouse 1         T       A       Shadify
 395
 396 # Button 2 in an Icon is de-iconify, in Corners/Sides/Titlebar gets Ops Menu
 397 #     Button    Context Modifi  Function
 398 Mouse 2         I       A       Iconify
 399 Mouse 2         FST     A       Menu Window-Ops2 Nop
 400
 401 # Button 3 does a raise-lower on anything
 402 Mouse 3         TSIF    A       RaiseLower
 403
 404 ############################################################################
 405 # KEYBOARD Setup
 406
 407 #
 408 # press arrow + control + meta anywhere, and scroll by 1 page
 409 Key Left        A       CM      Scroll -100 +0
 410 Key Right       A       CM      Scroll +100 +0
 411 Key Up          A       CM      Scroll +0   -100
 412 Key Down        A       CM      Scroll +0   +100
 413
 414 # press arrow + meta key, and scroll by 1/10 of a page
 415 Key Left        A       M       Scroll -10   +0
 416 Key Right       A       M       Scroll +10   +0
 417 Key Up          A       M       Scroll  +0  -10
 418 Key Down        A       M       Scroll  +0  +10
 419
 420 # press shift arrow + control anywhere, and move the pointer by 1% of a page
 421 Key Left        A       SC      CursorMove -1  +0
 422 Key Right       A       SC      CursorMove +1  +0
 423 Key Up          A       SC      CursorMove +0  -1
 424 Key Down        A       SC      CursorMove +0  +1
 425
 426 # press shift arrow + meta key, and move the pointer by 1/10 of a page
 427 Key Left        A       SM      CursorMove -10  +0
 428 Key Right       A       SM      CursorMove +10  +0
 429 Key Up          A       SM      CursorMove +0  -10
 430 Key Down        A       SM      CursorMove +0  +10
 431
 432 # Switch window, mswindows style :)
 433 Key Tab         A       M       Next [*] focus
 434 Key Escape      A       M       Prev [*] focus
 435
 436 # Goto desktop/page
 437 Key 1           A       CM      Desk 0 0
 438 Key 2           A       CM      Desk 0 1
 439 Key 3           A       CM      Desk 0 2
 440 Key 4           A       CM      Desk 0 3
 441 Key 5           A       CM      GotoPage 0 0
 442 Key 6           A       CM      GotoPage 1 0
 443 Key 7           A       CM      GotoPage 0 1
 444 Key 8           A       CM      GotoPage 1 1
 445
 446 #############################################################################
 447 # START-UP Functions
 448 #
 449 DestroyFunc InitFunction
 450 AddToFunc InitFunction
 451 +              I Module FvwmBacker
 452 +              I Module FvwmButtons
 453 +              I Module FvwmCommandS
 454 +              I Module FvwmPager 0 2
 455
 456 DestroyFunc RestartFunction
 457 AddToFunc RestartFunction
 458 +              I Module FvwmBacker
 459 +              I Module FvwmButtons
 460 +              I Module FvwmCommandS
 461 +              I Module FvwmPager 0 2
 462 +              I Schedule 1000 Raise-All
 463
 464 DestroyFunc UrgencyFunc
 465 AddToFunc UrgencyFunc
 466 +                             I Iconify off
 467 +                             I ThisWindow ("*Downloads") Break
 468 +                             I FlipFocus
 469 +                             I Raise
 470 +                             I WarpToWindow 5p 5p
 471
 472 DestroyFunc StartStandardSession
 473 AddToFunc StartStandardSession
 474 +              I GotoDeskAndPage 0 0 0
 475 +              I TERM_KOI8
 476 +              I Wait TERM
 477 +              I GotoDeskAndPage 0 0 1
 478 +              I TERM_UTF8 -geometry 38x30+0-0
 479 +              I Wait URxvt
 480 +              I GotoDeskAndPage 0 1 0
 481 +              I TERM_KOI8 -e su -
 482 +              I Wait TERM
 483 +              I PaVuControl
 484 +              I Exec exec "$HOME"/current/projects/audio-cdr-video/audio/pa-mic-off
 485 +              I XsetbgFilename
 486 +              I Wait gxmessage
 487 +              I GotoDeskAndPage 1 0 1
 488 +              I TERM_KOI8
 489 +              I Wait TERM
 490 +              I GotoDeskAndPage 1 1 0
 491 +              I TERM_UTF8 -iconic -name term-im-remote
 492 +              I Wait term-im-remote
 493 +              I TERM_KOI8 -geometry 60x25-5-5 -iconic -name term-im-local
 494 +              I Wait term-im-local
 495 +              I GotoDeskAndPage 2 0 1
 496 +              I TERM_KOI8 -geometry TERM_GEOM_BIG
 497 +              I Wait TERM
 498 +              I FireFox
 499 +              I Schedule 4500 GotoDeskAndPage 0 1 0
 500
 501 DestroyFunc ResumeFunction
 502 AddToFunc ResumeFunction
 503 +              I GotoDeskAndPage 0 0 0
 504 +              I TERM_KOI8
 505 +              I Wait TERM
 506 +              I None ("Volume Control") PaVuControl
 507 +              I Exec sleep 10; exec "$HOME"/current/projects/audio-cdr-video/audio/pa-mic-off
 508 +              I XsetbgFilename
 509 +              I Wait gxmessage
 510 +              I Any ("*Mozilla Firefox") GotoDeskAndPage 0 1 0
 511 +              I TestRc (Match) Break
 512 +              I None ("*Mozilla Firefox") FireFox
 513 +              I Schedule 4500 GotoDeskAndPage 0 1 0
 514
 515 ############################################################################
 516 # COMPLEX FUNCTIONS
 517 #
 518 DestroyFunc Center
 519 AddToFunc Center                I Move 50-50w 50-50w
 520 +                               I WarpToWindow 74p 18p
 521
 522 DestroyFunc Iconify-and-Raise
 523 AddToFunc Iconify-and-Raise     I Iconify
 524 +                               I Raise
 525
 526 DestroyFunc Maximize-Func
 527 AddToFunc Maximize-Func         C Maximize     toggle
 528 +                               D Maximize     100 100
 529
 530 DestroyFunc Move-or-Iconify
 531 AddToFunc Move-or-Iconify       I Raise
 532 +                               M Move
 533 +                               D Iconify
 534
 535 DestroyFunc Move-or-Raise
 536 AddToFunc Move-or-Raise         I Raise
 537 +                               M Move
 538 +                               D Lower
 539
 540 DestroyFunc Move-or-Raise2
 541 AddToFunc Move-or-Raise2        M Raise
 542 +                               M Move
 543 +                               D Lower
 544
 545 DestroyFunc Resize-or-Raise
 546 AddToFunc Resize-or-Raise       I Raise
 547 +                               M Resize
 548 +                               D Lower
 549
 550 DestroyFunc Resize-or-Raise2
 551 AddToFunc Resize-or-Raise2      M Raise
 552 +                               M Resize
 553 +                               D Lower
 554
 555 DestroyFunc Shadify
 556 AddToFunc Shadify               D WindowShade
 557 +                               M Move
 558 +                               C RaiseLower
 559
 560 DestroyFunc warp-or-run
 561 AddToFunc warp-or-run           I Next [$0 CirculateHit] Iconify -1
 562 +                               I Next [$0 CirculateHit] Focus
 563 +                               I None [$0] $1
 564
 565 DestroyFunc MailFunction
 566 AddToFunc MailFunction          I Next [$0] Iconify -1
 567 +                               I Next [$0] focus
 568 +                               I None [$0] Exec exec $0 $1
 569
 570 DestroyFunc PrintFunction
 571 AddToFunc PrintFunction         I Raise
 572 +                               I Exec exec xdpr -id $w
 573
 574 DestroyFunc Raise-All
 575 AddToFunc Raise-All           I All Raise
 576
 577 ##############################################################################
 578 # User-defined functions
 579 #
 580
 581 DestroyFunc PaVuControl
 582 AddToFunc PaVuControl         I GotoDeskAndPage 0 1 1
 583 +                             I Exec exec pavucontrol
 584 +                             I Wait "Volume Control"
 585
 586 changequote([,])
 587 DestroyFunc Id3Info
 588 AddToFunc Id3Info             I Exec "$HOME"/lib/audio/mp3/id3info.py "`deadbeef --nowplaying '%F'`" | text-wrap.py -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -
 589 changequote([`], ['])
 590
 591 DestroyFunc DeadBeef
 592 AddToFunc DeadBeef            I GotoDeskAndPage 0 1 1
 593 +                             I Exec exec deadbeef
 594
 595 DestroyFunc Term-Phdru
 596 AddToFunc Term-Phdru          I GotoDeskAndPage 1 0 1
 597 +                             I REMOTE_HOST_KOI8(phdru.name, phdru.name)
 598
 599 DestroyFunc Term-Phdru-Big
 600 AddToFunc Term-Phdru-Big      I GotoDeskAndPage 1 0 1
 601 +                             I REMOTE_HOST_KOI8_BIG(phdru.name, phdru.name)
 602
 603 DestroyFunc FireFox
 604 AddToFunc FireFox             I Any ("*Mozilla Firefox") Break
 605 +                             I GotoDeskAndPage 1 0 0
 606 +                             I Exec exec start-browser firefox
 607 +                             I Wait "*Mozilla Firefox"
 608 +                             I All ("*Mozilla Firefox") Lower
 609 +                             I Exec webbrowserX -n file:///home/phd/Internet/WWW/misc/index.html; exec webbrowserX -t file:///home/phd/Internet/WWW/misc/internet.html
 610 +                             I Wait "*Mozilla Firefox"
 611
 612 DestroyFunc Gajim
 613 AddToFunc Gajim               I GotoDeskAndPage 1 1 0
 614 +                             I Exec exec gajim
 615
 616 DestroyFunc Pidgin
 617 AddToFunc Pidgin              I GotoDeskAndPage 1 1 0
 618 +                             I Exec exec pidgin
 619
 620 DestroyFunc XFilename
 621 AddToFunc XSetbgFilename      I Exec "$HOME"/current/projects/xsetbg/print-filename.py | text-wrap.py -w TEXT_WIDTH -s -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -
 622
 623 ##############################################################################
 624 # MENU Setup
 625 #
 626
 627 # This defines the most common window operations
 628 AddToMenu Window-Ops    "Window Ops"    Title
 629 +                       "Center"        Center
 630 +                       "Move"          Move-or-Raise2
 631 +                       "Resize"        Resize-or-Raise2
 632 +                       "Raise"         Raise
 633 +                       "Lower"         Lower
 634 +                       "(De)Iconify"   Iconify
 635 +                       "(Un)Stick"     Stick
 636 +                       "(Un)Maximize"  maximize_func
 637 +                       ""              Nop
 638 +                       "Delete"        Delete
 639 +                       "Close"         Close
 640 +                       "Destroy"       Destroy
 641 +                       ""              Nop
 642 +                       "Refresh Screen" Refresh
 643
 644 # A trimmed down version of "Window Ops", good for binding to decorations
 645 DestroyMenu Window-Ops2
 646 AddToMenu Window-Ops2   "Center"        Center
 647 +                       "Move"          Move-or-Raise
 648 +                       "Iconify"       Iconify
 649 +                       "(Un)Stick"     Stick
 650 +                       "Refresh"       RefreshWindow
 651 +                       ""              Nop
 652 +                       "Close"         Close
 653 +                       "Delete"        Delete
 654 +                       "Destroy"       Destroy
 655 +                       ""              Nop
 656 +                       "Resize"        Resize-or-Raise
 657 +                       "Shade"         WindowShade
 658 +                       "Raise/Lower"   RaiseLower
 659 +                       ""              Nop
 660 +                       "ScrollBar"     Module FvwmScroll 2 2
 661 +                       "Print"         PrintFunction
 662
 663 AddToMenu Terminals     "Terminals" Title
 664 +               "Grey term (koi8)" TERM_KOI8
 665 +               "Grey term (utf8)" TERM_UTF8
 666 +               "Grey term (koi8,btlt)" TERM_KOI8_BOTLT
 667 +               "Grey term (koi8,btrt)" TERM_KOI8_BOTRT
 668 +               "Grey term (utf8,btlt)" TERM_UTF8_BOTLT
 669 +               "Grey term (utf8,btrt)" TERM_UTF8_BOTRT
 670 +               "Big grey term (koi8)" TERM_KOI8 -geometry TERM_GEOM_BIG
 671 +               "Big grey term (utf8)" TERM_UTF8 -geometry TERM_GEOM_BIG
 672 +                       ""      Nop
 673 +               "White/black term (koi8)" TERM_KOI8 -fg white -cr white -bg black
 674 +               "White/black term (utf8)" TERM_UTF8 -fg white -bg black
 675
 676 AddToMenu TermColors    "Term Colors" Title
 677 +                       "Term: black/mediumturquoise" TERM_KOI8 -fg black -cr black -bg mediumturquoise
 678 +                       "Term: black/lightseagreen" TERM_KOI8 -fg black -cr black -bg lightseagreen
 679 +                       ""      Nop
 680 +                       "Term: black/lightsteelblue" TERM_KOI8 -fg black -cr black -bg lightsteelblue
 681 +                       "Term: black/lightblue3" TERM_KOI8 -fg black -cr black -bg lightblue3
 682 +                       ""      Nop
 683 +                       "Term: black/lightgoldenrod" TERM_KOI8 -fg black -cr black -bg lightgoldenrod
 684 +                       "Term: black/rosybrown1" TERM_KOI8 -fg black -cr black -bg rosybrown1
 685 +                       "Term: black/pink1" TERM_KOI8 -fg black -cr black -bg pink1
 686 +                       ""      Nop
 687 +                       "Term: white/orchid4" TERM_KOI8 -fg white -cr white -bg orchid4
 688 +                       "Term: white/purple3" TERM_KOI8 -fg white -cr white -bg purple3
 689 +                       "Term: white/purple4" TERM_KOI8 -fg white -cr white -bg purple4
 690 +                       ""      Nop
 691 +                       "Term: white/lightslategrey" TERM_KOI8 -fg white -cr white -bg lightslategrey
 692 +                       "Term: white/navyblue" TERM_KOI8 -fg white -cr white -bg navyblue
 693 +                       "Term: white/mediumblue" TERM_KOI8 -fg white -cr white -bg mediumblue
 694 +                       "Term: white/steelblue" TERM_KOI8 -fg white -cr white -bg steelblue
 695 +                       ""      Nop
 696 +                       "Term: white/forestgreen" TERM_KOI8 -fg white -cr white -bg forestgreen
 697 +                       "Term: white/rosybrown" TERM_KOI8 -fg white -cr white -bg rosybrown
 698 +                       "Term: white/deeppink" TERM_KOI8 -fg white -cr white -bg deeppink
 699 +                       "Term: white/black" TERM_KOI8 -fg white -cr white -bg black
 700
 701 AddToMenu Systems       "Systems" Title
 702 +                       REMOTE_HOST_KOI8_MENU(phdru.name, phdru)
 703 +                       REMOTE_HOST_UTF8_MENU(phdru.name, phdru)
 704 +                       REMOTE_HOST_KOI8_BIG_MENU(phdru.name, PHDRU)
 705
 706 AddToMenu FvwmCommands  "Fvwm Commands" Title
 707 +                       "Restart" Restart
 708 +                       "Raise all" Raise-All
 709 #+                       "Restart Fvwm2" Restart fvwm2
 710 #+                       "Start Fvwm"    Restart fvwm
 711 +                       "Fvwm Setup"    Popup FvwmSetup
 712 +                       "Fvwm Modules"  Popup FvwmModules
 713 +                       "" Nop
 714 +                       "Exit Fvwm"     Quit
 715
 716 AddToMenu FvwmSetup     "Fvwm Setup" Title
 717 +                       "Start standard session" StartStandardSession
 718 +                       "Change Scrolling"      Popup FvwmScroll
 719
 720 AddToMenu FvwmScroll    "Change Scroll Behavior" Title
 721 +                       "OFF"   EdgeScroll 0 0
 722 +                       "ON"    EdgeScroll 100 100
 723 +                       "Horizontal Only"       EdgeScroll 100 0
 724 +                       "Vertical Only"         EdgeScroll 0 100
 725 +                       "Partial"               EdgeScroll 50 50
 726
 727 AddToMenu FvwmModules   "Fvwm Modules" Title
 728 +                       "Animate"      Module FvwmAnimate
 729 +                       "Auto"         Module FvwmAuto
 730 +                       "Backer"       Module FvwmBacker
 731 +                       "Banner"       Module FvwmBanner
 732 +                       "Buttons"      Module FvwmButtons
 733 +                       "Cascade"      Module FvwmCascade
 734 +                       "CommandS"     Module FvwmCommandS
 735 +                       "Console"      Module FvwmConsole
 736 +                       "ConsoleC"     Module FvwmConsoleC -e FvwmConsoleC.pl
 737 +                       "Cpp"          Module FvwmCpp
 738 +                       "Debug"        Module FvwmDebug
 739 +                       "DragWell"     Module FvwmDragWell
 740 +                       "Event"        Module FvwmEvent
 741 +                       "Form"         Module FvwmForm
 742 +                       "Gtk"          Module FvwmGtk
 743 +                       "IconBox"      Module FvwmIconBox
 744 +                       "IconMan"      Module FvwmIconMan
 745 +                       "Ident"        Module FvwmIdent
 746 +                       "M4"           Module FvwmM4
 747 +                       "Pager"        Module FvwmPager 0 2
 748 +                       "Rearrange"    Module FvwmRearrange
 749 +                       "Save"         Module FvwmSave
 750 +                       "SaveDesk"     Module FvwmSaveDesk
 751 +                       "Script"       Module FvwmScript
 752 +                       "Scroll"       Module FvwmScroll
 753 +                       "TaskBar"      Module FvwmTaskBar
 754 +                       "Theme"        Module FvwmTheme
 755 +                       "Tile"         Module FvwmTile
 756 +                       "Wharf"        Module FvwmWharf
 757 +                       "WinList"      Module FvwmWinList
 758
 759 # This is the root menu
 760 AddToMenu RootMenu "Root Menu"  Title
 761 +               "Terminals"     Popup Terminals
 762 #+               "Color term"    Popup TermColors
 763 +               "Systems"       Popup Systems
 764 +               ""              Nop
 765 +               "Browsers"      Popup Browsers
 766 +               "Utilities"     Popup Utilities
 767 #+               ""              Nop
 768 #+               "Lock Screen"   Popup XlockMenu
 769 +               "XScreenSaver"  Popup XScreenSaverMenu
 770 #+               "Tv-tuner"      Popup Tv-tuner
 771 +               ""              Nop
 772 +               "XSetBg"        Popup XSetBgMenu
 773 +               "Fvwm Commands" Popup FvwmCommands
 774
 775 # This menu will fire up some often used programs
 776 DestroyMenu  Utilities
 777 AddToMenu Utilities     "Choose one:" Title
 778 +                       "qPDFview" Exec exec qpdfview
 779 +                       "FBReader" Exec exec fbreader
 780 +                       ""       Nop
 781 +                       "GVim"     Exec exec gvim
 782 +                       ""       Nop
 783 +                       "MyRuLb"   Exec exec "$HOME"/admin/prog/myrulib/myrulib
 784 +                       ""       Nop
 785 #+                       "XFortune" Exec /usr/games/fortune | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -
 786 #+                       "xbuffy" Exec exec xbuffy -fn 'XBUFFY_FONT' -geometry +0+125 -boxfile mail/misc/.xbuffyrc
 787 +                       ""       Nop
 788 +                       "pavucontrol" PaVuControl
 789 +                       "DeadBeef"    DeadBeef
 790 +                       "Id3Info"     Id3Info
 791 +                       ""       Nop
 792 +                       "Gajim"       Gajim
 793 +                       "Pidgin"      Pidgin
 794 +                       ""       Nop
 795 +                       "xload"  Exec exec xload -geometry =136x136+0+0
 796 +                       "Top"    TERM_KOI8 -T Top -n Top -e top
 797 +                       ""       Nop
 798 +                       "Refresh Screen" Refresh
 799 +                       "xrefresh" Exec exec xrefresh
 800 +                       ""       Nop
 801 #+                       "xcalc" Exec exec xcalc
 802 +                       "xclipboard" Exec exec xclipboard
 803 +                       "xcutsel" Exec exec xcutsel
 804 #+                       "xman" Exec exec xman -notopbox -geometry +150+102
 805 #+                       "emacs" Exec emacs -geometry 81x35+150+34
 806 #+                       "xv" Function warp-or-run xv "Exec exec xv -ncols 240 -geometry +0+0"
 807
 808 DestroyMenu  Browsers
 809 AddToMenu Browsers      "Choose one:" Title
 810 +                       "FireFox" FireFox
 811 +                       "Chromium" None ("*Chromium") Exec exec start-browser chromium
 812 +                       "Opera" None ("*Opera") Exec exec start-browser opera
 813
 814 # A wide variety of screenlocking options...
 815 #AddToMenu XlockMenu     "Choose one:" Title
 816 #+                       "Hop" Exec exec xlock -mode hop
 817 #+                       "Image" Exec exec xlock -mode image
 818 #+                       "Life" Exec exec xlock -mode life
 819 #+                       "Flame" Exec exec xlock -mode flame
 820 #+                       "Pyro" Exec exec xlock -mode pyro
 821 #+                       "Qix" Exec exec xlock -mode qix
 822 #+                       "Rotor" Exec exec xlock -mode rotor
 823 #+                       "Swarm" Exec exec xlock -mode swarm
 824 #+                       "" Nop
 825 #+                       "Random" Exec exec xlock -mode random
 826 #+                       "Blank" Exec exec xlock -mode blank
 827
 828 AddToMenu XScreenSaverMenu     "Choose mode:" Title
 829 +                       "Blank Screen Now" Exec exec xscreensaver-command -activate
 830 +                       "Lock Screen Now"  Exec exec xscreensaver-command -lock
 831 +                       "Screen Saver Demo" Exec exec xscreensaver-command -demo
 832 +                       "Screen Saver Preferences"  Exec exec xscreensaver-command -prefs
 833 +                       "Reinitialize Screen Saver" Exec exec xscreensaver-command -restart
 834 +                       "" Nop
 835 +                       "Launch Screen Saver"       Exec exec xscreensaver
 836 +                       "Kill Screen Saver"         Exec exec xscreensaver-command -exit
 837
 838 AddToMenu XSetBgMenu    "XSetBg" Title
 839 +                       "Change wallpaper" Exec exec "$HOME"/current/projects/xsetbg/xsetbg-force
 840 +                       "Start" Exec exec "$HOME"/current/projects/xsetbg/xsetbg-http-start
 841 +                       "Stop" Exec exec "$HOME"/current/projects/xsetbg/xsetbg-http-stop
 842 +                       "Restart" Exec exec "$HOME"/current/projects/xsetbg/xsetbg-http-restart
 843 +                       ""       Nop
 844 changequote([,])
 845 +                       "Xli" Exec fn="`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r`" && exec xli -title "`echo $fn | sed 's/ /_/g'`" "$fn"
 846 +                       "Xli (scaled)" Exec fn="`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r`" && exec xli -title "`echo $fn | sed 's/ /_/g'`" -zoom auto "$fn"
 847 +                       "Open in browser" Exec exec webbrowserX -n "`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r`"
 848 +                       "Filename" Exec exec "$HOME"/current/projects/xsetbg/print-filename.py -e koi8-r
 849 +                       "XFilename" Exec "$HOME"/current/projects/xsetbg/print-filename.py | text-wrap.py -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -
 850 +                       "XFilename (wrapped)" XSetbgFilename
 851 +                       ""       Nop
 852 +                       "Xli (prev.)" Exec fn="`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r 1`" && exec xli -title "`echo $fn | sed 's/ /_/g'`" "$fn"
 853 +                       "Xli (prev., scaled)" Exec fn="`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r 1`" && exec xli -title "`echo $fn | sed 's/ /_/g'`" -zoom auto "$fn"
 854 +                       "Open in browser (prev.)" Exec exec webbrowserX -n "`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r 1`"
 855 changequote([`], ['])
 856 +                       "Filename (prev.)" Exec exec "$HOME"/current/projects/xsetbg/print-filename.py -e koi8-r 1
 857 +                       "XFilename (prev.)" Exec "$HOME"/current/projects/xsetbg/print-filename.py 1 | text-wrap.py -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -
 858 +                       "XFilename (prev., wrapped)" Exec "$HOME"/current/projects/xsetbg/print-filename.py 1 | text-wrap.py -w TEXT_WIDTH -s -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -
 859
 860 ############################################################################
 861 # FvwmBacker
 862 #
 863 #*FvwmBacker: Command (Desk 0, Page * *) -solid DarkCyan
 864 #*FvwmBacker: Command (Desk 1, Page * *) -solid steelblue
 865 #*FvwmBacker: Command (Desk 2, Page * *) -solid midnightblue
 866 *FvwmBacker: Command (Desk *, Page * *) Exec exec "$HOME"/current/projects/xsetbg/xsetbg-http-change
 867
 868 ############################################################################
 869 # FvwmButtons
 870 #
 871 # Colors
 872 *FvwmButtons: Fore Black
 873 *FvwmButtons: Back rgb:90/80/90
 874
 875 # Font
 876 *FvwmButtons: Font BUTTONS_FONT
 877
 878 # Geometry-- really likes to pick its own size, but giving a position is OK
 879 *FvwmButtons: Geometry -1+1
 880
 881 # Layout: specify rows or columns, not both
 882 *FvwmButtons: Rows 2 #, Columns 5
 883
 884 # Transparent background
 885 #*FvwmButtons: Pixmap none
 886 # Background
 887 #*FvwmButtons: Pixmap fvwm.xpm
 888
 889 # Define the buttons to use.....
 890 #*FvwmButtons: Move              arrows2.xpm     Move
 891 #*FvwmButtons: Kill              skull.xpm       Destroy
 892 #*FvwmButtons: Quit              nuke.xpm        Popup "Quit-Verify"
 893
 894 #*FvwmButtons: (Swallow XClock 'Exec exec xclock -update 1 -geometry -3000-3000')
 895
 896 # Buttons
 897 pushdef(`TERM_KOI8', `Exec "TERM" LC_CTYPE=ru_RU.KOI8-R exec TERM')
 898 pushdef(`TERM_UTF8', `Exec "URxvt" exec "$HOME"/lib/X11/utf8rxvt')
 899 *FvwmButtons: (Title Term,     Icon rterm2.xpm,      Action TERM_KOI8)
 900 *FvwmButtons: (Title UTF-8,    Icon rterm2.xpm,      Action TERM_UTF8)
 901 *FvwmButtons: (Title phdru,    Icon xterm-sgi.xpm,   Action REMOTE_HOST_KOI8(phdru.name, phdru.name))
 902 popdef(`TERM_KOI8', `TERM_UTF8')
 903
 904 *FvwmButtons: (Title Wallpaper, Icon find1.xpm,        Action Exec "gxmessage" "$HOME"/current/projects/xsetbg/print-filename.py | text-wrap.py -w TEXT_WIDTH -s -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -)
 905 *FvwmButtons: (Title "-1",      Icon find1.xpm,        Action Exec "gxmessage" "$HOME"/current/projects/xsetbg/print-filename.py 1 | text-wrap.py -w TEXT_WIDTH -s -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -)
 906 *FvwmButtons: (Title Next,      Icon Jrecycle.xpm,     Action Exec exec "$HOME"/current/projects/xsetbg/xsetbg-http-force)
 907 *FvwmButtons: (Title pavucontrol, Icon mini.sound.xpm, Action Exec "Volume Control" exec pavucontrol)
 908 #*FvwmButtons: (Title Id3Info,  Icon bell.xpm,         Action Id3Info)
 909 *FvwmButtons: (Title DeadBeef,  Icon bell.xpm,         Action Exec "DeaDBeeF-*" exec deadbeef)
 910 #*FvwmButtons: (Title XLock,     Icon Jxlock.xpm,      Action Exec exec xscreensaver-command -lock)
 911
 912 ############################################################################
 913 # FvwmForm
 914 #
 915 # FvwmForm alias - rlogin to host via term
 916 #FvwmForm Rlogin
 917 #*Rlogin: WarpPointer
 918 #*Rlogin: Font         *helvetica*m*r*n*14*
 919 #*Rlogin: ButtonFont   *helvetica*m*o*n*14*
 920 #*Rlogin: InputFont    *cour*m*r*n*14*
 921 #*Rlogin: Fore         Black
 922 #*Rlogin: Back         Light Gray
 923 #*Rlogin: ItemFore          Wheat
 924 #*Rlogin: ItemBack          Gray50
 925 ## begin items
 926 #*Rlogin: Line         center
 927 #*Rlogin: Text         "Login to Remote Host"
 928 #*Rlogin: Line         center
 929 #*Rlogin: Text         "Host:"
 930 #*Rlogin: Input        HostName  20   ""
 931 #*Rlogin: Line         center
 932 #*Rlogin: Selection    UserSel   single
 933 #*Rlogin: Choice       Default   Default   on   "same user"
 934 #*Rlogin: Choice       Custom    Custom    off  "user:"
 935 #*Rlogin: Input        UserName  10   ""
 936 #*Rlogin: Line         expand
 937 #*Rlogin: Button       quit "Login" ^M
 938 #*Rlogin: Command      TERM_KOI8 -T term@$(HostName) -e rlogin $(HostName) $(Custom?-l $(UserName))
 939 #*Rlogin: Button       restart   "Clear"
 940 #*Rlogin: Command Beep
 941 #*Rlogin: Button       quit "Cancel"
 942 #*Rlogin: Command Nop
 943 ##
 944 ## FvwmForm alias - query exit ala mwm
 945 #FvwmForm QuitVerify
 946 #*QuitVerify: GrabServer
 947 #*QuitVerify: WarpPointer
 948 #*QuitVerify: Font          *helvetica*m*r*n*14*
 949 ##*QuitVerify: ButtonFont    *helvetica*m*o*n*14*
 950 #*QuitVerify: ButtonFont    7x13bold
 951 #*QuitVerify: Fore          Black
 952 #*QuitVerify: Back          Light Gray
 953 #*QuitVerify: ItemFore Wheat
 954 #*QuitVerify: ItemBack Gray50
 955 ## begin items
 956 #*QuitVerify: Line          center
 957 #*QuitVerify: Text          "Do you really want to exit FVWM?"
 958 #*QuitVerify: Line          expand
 959 #*QuitVerify: Button   quit      " Exit "
 960 #*QuitVerify: Command  Quit
 961 #*QuitVerify: Button   quit      "Cancel"
 962 #*QuitVerify: Command  Nop
 963 #
 964 ##
 965 ## MyTalk & MyFvwmTalk from Dave Goldberg
 966 ## MyTalk Form - dissappears after use
 967 #FvwmForm MyTalk
 968 #*MyTalk: WarpPointer
 969 #*MyTalk: Font *helvetica*m*r*n*14*
 970 #*MyTalk: ButtonFont *helvetica*m*o*n*14*
 971 #*MyTalk: InputFont *cour*m*r*n*14*
 972 #*MyTalk: Fore Red
 973 #*MyTalk: Back Gray
 974 #*MyTalk: ItemFore Blue
 975 #*MyTalk: ItemBack Gray
 976 #*MyTalk: Line center
 977 #*MyTalk: Text "Fvwm Function"
 978 #*MyTalk: Input Func 40 ""
 979 #*MyTalk: Line expand
 980 #*MyTalk: Button quit "Run" ^M
 981 #*MyTalk: Command $(Func)
 982 #*MyTalk: Button restart "Clear" ^R
 983 #*MyTalk: Button quit "Cancel" ^C
 984 #*MyTalk: Command Nop
 985 ##
 986 ## MyFvwmTalk Form - sticks around
 987 #FvwmForm MyFvwmTalk
 988 #*MyFvwmTalk: WarpPointer
 989 #*MyFvwmTalk: Font *helvetica*m*r*n*14*
 990 #*MyFvwmTalk: ButtonFont *helvetica*m*o*n*14*
 991 #*MyFvwmTalk: InputFont *cour*m*r*n*14*
 992 #*MyFvwmTalk: Fore Red
 993 #*MyFvwmTalk: Back Gray
 994 #*MyFvwmTalk: ItemFore Blue
 995 #*MyFvwmTalk: ItemBack Gray
 996 #*MyFvwmTalk: Line center
 997 #*MyFvwmTalk: Text "Fvwm Function"
 998 #*MyFvwmTalk: Input Func 40 ""
 999 #*MyFvwmTalk: Line expand
1000 #*MyFvwmTalk: Button restart "Run" ^M
1001 #*MyFvwmTalk: Command $(Func)
1002 #*MyFvwmTalk: Button restart "Clear" ^R
1003 #*MyFvwmTalk: Command Nop
1004 #*MyFvwmTalk: Button restart "Iconify" ^Z
1005 #*MyFvwmTalk: Command Next [MyFvwmTalk] Iconify
1006 #*MyFvwmTalk: Button quit "Quit" ^C
1007 #*MyFvwmTalk: Command Nop
1008
1009 ############################################################################
1010 # FvwmIconBox
1011 #
1012 # NOTE: Icons will only be shown in module if "Style * !Icon" is set
1013 *FvwmIconBox: IconBack    #cfcfcf
1014 *FvwmIconBox: IconHiFore  black
1015 *FvwmIconBox: IconHiBack  LightSkyBlue
1016 *FvwmIconBox: Back        #5f9ea0
1017 #*FvwmIconBox: Fore       blue
1018 *FvwmIconBox: Geometry    5x1+0+0
1019 *FvwmIconBox: MaxIconSize 64x38
1020 *FvwmIconBox: Font        ICON_BOX_FONT
1021 *FvwmIconBox: SortIcons   IconName
1022 *FvwmIconBox: Padding     4
1023 *FvwmIconBox: Lines       10
1024 *FvwmIconBox: SBWidth     11
1025 *FvwmIconBox: Placement   Left Top
1026 *FvwmIconBox: Pixmap      fvwm.xpm
1027 #*FvwmIconBox: HideSC Horizontal
1028 *FvwmIconBox: SetWMIconSize
1029 *FvwmIconBox: HilightFocusWin
1030 #*FvwmIconBox: Resolution          Desk
1031 *FvwmIconBox: Mouse       1       Click           RaiseLower
1032 *FvwmIconBox: Mouse       1       DoubleClick     Iconify
1033 *FvwmIconBox: Mouse       2       Click           Iconify -1, Focus
1034 *FvwmIconBox: Mouse       3       Click           Module FvwmIdent
1035 *FvwmIconBox: Key         r       RaiseLower
1036 *FvwmIconBox: Key         space   Iconify
1037 *FvwmIconBox: Key         d       Close
1038 *FvwmIconBox: Key         n       Next
1039 *FvwmIconBox: Key         p       Prev
1040 *FvwmIconBox: Key         h       Left
1041 *FvwmIconBox: Key         j       Down
1042 *FvwmIconBox: Key         k       Up
1043 *FvwmIconBox: Key         l       Right
1044
1045 ############################################################################
1046 # FvwmIdent
1047 #
1048 # Give us colors and a fonts
1049 *FvwmIdent: Back MidnightBlue
1050 *FvwmIdent: Fore Yellow
1051 *FvwmIdent: Font IDENT_FONT
1052
1053 ############################################################################
1054 # FvwmPager
1055 #
1056 *FvwmPager: Back #908090
1057 *FvwmPager: Fore #484048
1058 *FvwmPager: Font TITLE_FONT
1059 *FvwmPager: Hilight #cab3ca
1060 *FvwmPager: Geometry PAGER_GEOM
1061 *FvwmPager: Label 0 System
1062 *FvwmPager: Label 1 Net
1063 *FvwmPager: Label 2 Work
1064 *FvwmPager: SmallFont SMALL_PAGER_FONT
1065
1066 *FvwmPager: Balloons All
1067 *FvwmPager: BalloonBack #efe3b5
1068 *FvwmPager: BalloonFore Black
1069 *FvwmPager: BalloonFont ICON_FONT
1070 *FvwmPager: BalloonYOffset +2
1071 *FvwmPager: BalloonBorderWidth 1
1072 *FvwmPager: BalloonBorderColor Black
1073
1074 ############################################################################
1075 # FvwmScroll
1076 #
1077 *FvwmScroll: Back grey40
1078 *FvwmScroll: Fore green
1079
1080 ############################################################################
1081 # FvwmWinList
1082 #
1083 *FvwmWinList: Back #908090
1084 *FvwmWinList: Fore Black
1085 *FvwmWinList: Font WIN_LIST_FONT
1086 *FvwmWinList: Action Click1 Iconify -1, Focus
1087 *FvwmWinList: Action Click2 Iconify
1088 *FvwmWinList: Action Click3 Module "FvwmIdent: " FvwmIdent
1089 *FvwmWinList: UseSkipList
1090 *FvwmWinList: Geometry +10-10