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