.fvwm/.fvwm2rc.old
author Oleksandr Gavenko <gavenkoa@gmail.com>
Sun, 28 Dec 2008 20:16:02 +0200
branchfvwm
changeset 355 02ae380f0a1f
parent 346 fe066283fced
child 390 4944184fa48b
permissions -rw-r--r--
Define key binding.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
345
c2a810e2abb8 Add emacs to menu.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents: 344
diff changeset
     1
# -*- fvwm -*-
c2a810e2abb8 Add emacs to menu.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents: 344
diff changeset
     2
342
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
     3
#####
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
     4
# Set Environment variables
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
     5
###########
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
     6
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
     7
SetEnv fvwm_webbrowser /usr/bin/firefox
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
     8
SetEnv fvwm_term /usr/bin/xterm
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
     9
SetEnv fvwm_mail /usr/bin/icedove
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    10
SetEnv fvwm_media_player /usr/bin/vlc
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    11
SetEnv fvwm_video_player /usr/bin/vlc
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    12
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    13
# Tells  how  hard  it  should be to change the desktop viewport by moving the mouse over the edge of the
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    14
# screen and how hard it should be to move a window over the edge of the screen.
341
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    15
EdgeResistance 250 10
342
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    16
# Percentage of a page to scroll when the cursor hits the edge of a page.
341
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    17
EdgeScroll 100 100
342
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    18
# Width or height of the invisible window that fvwm creates on the edges of the  screen  that
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    19
# are used for the edge scrolling feature.
341
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    20
ClickTime 750
342
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    21
EdgeThickness 1
341
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    22
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    23
DeskTopSize 3x3
342
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    24
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    25
DesktopName 0 Main
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    26
DesktopName 1 Work
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    27
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
    28
MenuStyle * fvwm, Foreground black, Background grey60, Greyed grey40
341
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    29
MenuStyle * Font -adobe-times-bold-r-*-*-14-*-*-*-*-*-*-*
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    30
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    31
ColormapFocus FollowsMouse
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    32
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    33
# default Styles:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    34
# make sure these fonts exist on your system:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    35
Style *           Font -adobe-times-bold-r-*-*-12-*-*-*-*-*-*-*
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    36
Style *           IconFont -adobe-times-bold-r-*-*-12-*-*-*-*-*-*-*
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    37
Style *           HilightFore black, HilightBack palevioletred
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    38
Style *           BorderWidth 7, HandleWidth 7
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    39
Style *           Icon unknown1.xpm, Color lightgrey/dimgrey
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    40
Style *           MWMFunctions, MWMDecor, HintOverride
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    41
Style *           DecorateTransient, NoPPosition
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    42
Style *           IconBox 0 -10 -280 -1
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    43
Style *           FocusFollowsMouse
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    44
Style *           TileCascadePlacement
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    45
Style *           EWMHUseStackingOrderHints
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    46
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    47
# Styles for various Fvwm modules:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    48
Style Fvwm*       NoTitle,  Sticky, WindowListSkip
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    49
Style Fvwm*       BorderWidth 2, CirculateSkipIcon, CirculateSkip
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    50
Style FvwmPager   StaysOnTop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    51
Style FvwmBanner  StaysOnTop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    52
Style FvwmButtons Icon toolbox.xpm, ClickToFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    53
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    54
# Styles for your common terminal emulator programs.
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    55
# xterms and rxvts in a separate icon box:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    56
Style XTerm       Icon xterm.xpm, SloppyFocus, IconBox -70 1 -1 -140
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    57
Style rxvt        Icon term.xpm, SloppyFocus, IconBox -70 1 -1 -140
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    58
Style rxvt        MWMBorder, MWMButtons
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    59
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    60
# Styles for various common programs:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    61
Style *lock       NoTitle, NoHandles, Sticky, WindowListSkip, ClickToFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    62
Style xbiff       NoTitle, Sticky, WindowListSkip, ClickToFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    63
Style xcalc       Icon xcalc.xpm, NoButton 2,ClickToFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    64
Style xmh         Icon mail1.xpm, NoIconTitle,StickyIcon
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    65
Style xmh         NoButton 2
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    66
Style xman        Icon xman.xpm, ClickToFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    67
Style xmag        Icon mag_glass.xpm, ClickToFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    68
Style xgraph      Icon graphs.xpm, ClickToFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    69
Style xmosaic     Color Green/Yellow, ClickToFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    70
Style OpenOffice* NoFuncHint
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    71
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    72
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    73
# some simple default key bindings:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    74
Key Next         A       SCM     Next [*] Focus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    75
Key Prior        A       SCM     Prev [*] Focus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    76
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    77
# some simple default mouse bindings:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    78
#   for the root window:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    79
Mouse 1 R       A       Menu MenuFvwmRoot Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    80
Mouse 2 R       A       Menu MenuFvwmWindowOps Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    81
Mouse 3 R       A       WindowList
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    82
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    83
#   for the title bar buttons:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    84
Mouse 0 1       A       Menu MenuFvwmWindowOps2 Close
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    85
Mouse 0 2       A       FuncFvwmMaximize
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    86
Mouse 0 4       A       Iconify
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    87
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    88
#   for other parts of the window/borders/icons:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    89
Mouse 1 F       A       FuncFvwmResizeOrRaise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    90
Mouse 1 TS      A       FuncFvwmMoveOrRaise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    91
Mouse 1 I       A       FuncFvwmMoveOrIconify
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    92
Mouse 2 I       A       Iconify
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    93
Mouse 2 FST     A       Menu MenuFvwmWindowOps2 Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    94
Mouse 3 TSIF    A       RaiseLower
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    95
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    96
######################## Initialization Functions ############################
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    97
AddToFunc StartFunction
gavenkoa@gavenko.bifit.int
parents:
diff changeset
    98
+ I Module FvwmAnimate
344
657cb5ae9736 Stop banner!
gavenkoa@gavenko.bifit.int
parents: 343
diff changeset
    99
# Don't splash Bunner.
657cb5ae9736 Stop banner!
gavenkoa@gavenko.bifit.int
parents: 343
diff changeset
   100
# + I Module FvwmBanner
341
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   101
+ I Module FvwmButtons
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   102
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   103
AddToFunc InitFunction
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   104
+ I exec xsetroot -mod 2 2 -fg rgb:55/40/55 -bg rgb:70/50/70
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   105
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   106
# For some SM-s (like gnome-session) there is an internal background setter.
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   107
AddToFunc SessionInitFunction
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   108
+ I Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   109
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   110
######################## Menus ###################
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   111
Read /etc/X11/fvwm/menudefs.hook Quiet
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   112
Read menudefs.hook Quiet
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   113
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   114
DestroyMenu MenuFvwmRoot
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   115
AddToMenu MenuFvwmRoot  "$[gt.Root Menu]"             Title
345
c2a810e2abb8 Add emacs to menu.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents: 344
diff changeset
   116
+                       "&1. XTerm"                   Exec exec xterm
c2a810e2abb8 Add emacs to menu.
Oleksandr Gavenko <gavenkoa@gmail.com>
parents: 344
diff changeset
   117
+                       "&2. Emacs"                   Exec exec emacs
341
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   118
+                       ""              Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   119
+                       "&D. Debian Menu"             Popup "/Debian"
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   120
+                       ""              Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   121
+                       "&R. $[gt.Remote Logins]"     Popup MenuFvwmLogins
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   122
+                       ""              Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   123
+                       "&U. $[gt.Utilities]"         Popup MenuFvwmUtilities
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   124
+                       ""              Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   125
+                       "&M. $[gt.Fvwm Modules]"      Popup MenuFvwmModules
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   126
+                       "&W. $[gt.Fvwm Window Ops]"   Popup MenuFvwmWindowOps
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   127
+                       "&S. $[gt.Fvwm Config Ops]"   Popup MenuFvwmConfig
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   128
+                       ""              Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   129
+                       "&F. $[gt.Refresh Screen]"   Refresh
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   130
+                       "&C. $[gt.Recapture Screen]" Recapture
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   131
+                       ""              Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   132
+                       "&X. $[gt.Exit Fvwm]" Popup MenuFvwmQuitVerify
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   133
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   134
DestroyMenu MenuFvwmUtilities
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   135
AddToMenu MenuFvwmUtilities     "$[gt.Utilities]" Title
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   136
+                       "&T. Top"       Exec exec xterm -T Top -n Top -e top
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   137
+                       "&C. Calculator" Exec exec xcalc
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   138
+                       "&M. Xman"      Exec exec xman
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   139
+                       "&G. Xmag"      Exec exec xmag
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   140
+                       "&R. Editres"   Exec exec editres
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   141
+                       ""              Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   142
+                       "&E. XEmacs"    Exec exec xemacs
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   143
+                       "&A. Xmh Mail"  FuncFvwmMailXmh xmh "-font fixed"
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   144
+                       ""              Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   145
+                       "&L. XLock"     Exec exec xlock -mode random
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   146
+                       ""              Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   147
+                       "&D. $[gt.Reset X defaults]" Exec xrdb -load $HOME/.Xdefaults
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   148
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   149
DestroyMenu MenuFvwmConfig
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   150
AddToMenu MenuFvwmConfig "$[gt.Fvwm Config Ops]" Title
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   151
+ "&S. $[gt.Sloppy Focus]"        FuncFvwmFocusPolicyChange SloppyFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   152
+ "&C. $[gt.Click To Focus]"      FuncFvwmFocusPolicyChange ClickToFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   153
+ "&F. $[gt.Focus Follows Mouse]" FuncFvwmFocusPolicyChange FocusFollowsMouse
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   154
+ "" Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   155
+ "&1. $[gt.Colormap Follows Mouse]" ColormapFocus FollowsMouse
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   156
+ "&2. $[gt.Colormap Follows Focus]" ColormapFocus FollowsFocus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   157
+ "" Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   158
+ "&3. $[gt.Full Paging ON]"           EdgeScroll 100 100
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   159
+ "&4. $[gt.All Paging OFF]"           EdgeScroll 0 0
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   160
+ "&5. $[gt.Horizontal Paging Only]"   EdgeScroll 100 0
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   161
+ "&6. $[gt.Vertical Paging Only]"     EdgeScroll 0 100
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   162
+ "&7. $[gt.Partial Paging]"           EdgeScroll 50 50
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   163
+ "&8. $[gt.Full Paging && Edge Wrap]" EdgeScroll 100000 100000
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   164
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   165
# The window Ops menus exhibit a different HotKey style.
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   166
# There are 2 versions of the WindowOps Menu, meant to be bound to different
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   167
# things.  Here is the "common" part:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   168
DestroyFunc FuncFvwmWindowCommon
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   169
AddToFunc FuncFvwmWindowCommon
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   170
+ I AddToMenu $0 "$[gt.&Move]"              Move
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   171
+ I AddToMenu $0 "$[gt.&Resize]"            Resize
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   172
+ I AddToMenu $0 "$[gt.R&aise]"             Raise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   173
+ I AddToMenu $0 "$[gt.&Lower]"             Lower
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   174
+ I AddToMenu $0 "$[gt.(De)&Iconify]"       Iconify
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   175
+ I AddToMenu $0 "$[gt.(Un)&Stick]"         Stick
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   176
+ I AddToMenu $0 "$[gt.(Un)Ma&ximize]"      Maximize
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   177
+ I AddToMenu $0 ""                 Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   178
+ I AddToMenu $0 "$[gt.&Delete]"            Delete
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   179
+ I AddToMenu $0 "$[gt.&Close]"             Close
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   180
+ I AddToMenu $0 "$[gt.Destroy]"            Destroy
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   181
+ I AddToMenu $0 ""                 Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   182
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   183
# First windowops menu, bound to:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   184
# mouse 2 on root
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   185
# Root menu
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   186
DestroyMenu MenuFvwmWindowOps
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   187
AddToMenu MenuFvwmWindowOps     "$[gt.Window Ops]"    Title
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   188
FuncFvwmWindowCommon MenuFvwmWindowOps
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   189
+ "$[gt.Re&fresh Window]" RefreshWindow
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   190
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   191
# Second windowops menu, bound to:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   192
# any mouse on titlebar button 1
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   193
# mouse 2 on frame, side or titlebar
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   194
DestroyMenu MenuFvwmWindowOps2
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   195
AddToMenu MenuFvwmWindowOps2
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   196
FuncFvwmWindowCommon MenuFvwmWindowOps2
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   197
+ Scroll&Bar       Module FvwmScroll 2 2
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   198
+ "&$[gt.Print]"           FuncFvwmPrint
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   199
+ "$[gt.Print Re&verse]" FuncFvwmPrintReverse
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   200
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   201
# 3 different ways to log on, take your pick:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   202
DestroyFunc FuncFvwmRloginXterm
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   203
AddToFunc FuncFvwmRloginXterm \
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   204
  I Exec xterm -name $0 -title "$USER @ $0" -e rlogin $0
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   205
DestroyFunc FuncFvwmRloginRxvt
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   206
AddToFunc FuncFvwmRloginRxvt \
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   207
  I Exec rxvt -name $0 -n $0 -title $USER@$0 -e rlogin $0
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   208
DestroyFunc FuncFvwmRloginSshRxvt
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   209
AddToFunc FuncFvwmRloginSshRxvt \
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   210
  I Exec Exec ssh $0 rxvt -display $HOSTDISPLAY
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   211
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   212
# be sure to fill these in with your correct machine names:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   213
DestroyMenu MenuFvwmLogins
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   214
AddToMenu MenuFvwmLogins
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   215
+ &dopey  FuncFvwmRloginXterm dopey
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   216
+ &snoopy FuncFvwmRloginXterm snoopy
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   217
+ s&ignal Exec rxterm signal
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   218
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   219
DestroyMenu MenuFvwmModules
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   220
AddToMenu MenuFvwmModules "$[gt.Fvwm Modules]"        Title
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   221
+ "&1. $[gt.Control Animation]" Popup  MenuFvwmAnimate
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   222
+ "&B. Button-Bar"        Module FvwmButtons
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   223
+ "&O. IconBox"           FuncFvwmConfigureIconBox
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   224
+ "&F. Forms"             Popup  MenuFvwmForms
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   225
+ "&I. Identify"          Module FvwmIdent
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   226
+ "&M. IconMan"           Module FvwmIconMan
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   227
+ "&N. Banner"            Module FvwmBanner
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   228
+ "&C. Console"           Module FvwmConsole
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   229
+ "&P. Pager"             Module FvwmPager 0 0
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   230
+ "&2. Pager (2 $[gt.desks])"   Module FvwmPager 0 1
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   231
+ "&R. Backer"            Module FvwmBacker
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   232
+ "&S. ScrollBar"         Module FvwmScroll 50 50
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   233
+ "&T. FvwmTaskBar"       Module FvwmTaskBar
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   234
+ "&U. AutoRaise"         Module FvwmAuto 200 Raise Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   235
+ "&W. WinList"           Module FvwmWinList
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   236
+ "&X. $[gt.Stop Module Menu]"  Popup  MenuFvwmStopModule
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   237
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   238
DestroyMenu MenuFvwmStopModule
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   239
AddToMenu MenuFvwmStopModule "$[gt.Stop Fvwm Modules]" Title
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   240
+ "&B. $[gt.Stop] Button-Bar"  KillModule FvwmButtons
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   241
+ "&O. $[gt.Stop] IconBox"     KillModule FvwmIconBox
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   242
+ "&M. $[gt.Stop] IconMan"     KillModule FvwmIconMan
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   243
+ "&P. $[gt.Stop] Pager"       KillModule FvwmPager
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   244
+ "&R. $[gt.Stop] Backer"      KillModule FvwmBacker
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   245
+ "&S. $[gt.Stop] ScrollBar"   KillModule FvwmScroll
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   246
+ "&T. $[gt.Stop] FvwmTaskBar" KillModule FvwmTaskBar
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   247
+ "&U. $[gt.Stop] AutoRaise"   KillModule FvwmAuto
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   248
+ "&W. $[gt.Stop] WinList"     KillModule FvwmWinList
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   249
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   250
DestroyMenu MenuFvwmForms
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   251
AddToMenu MenuFvwmForms
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   252
+ "&C. Capture"       Module FvwmForm FvwmForm-Capture
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   253
+ "&D. Form Defaults" Module FvwmForm FvwmForm-Form
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   254
+ "&R. Rlogin"        Module FvwmForm FvwmForm-Rlogin
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   255
+ "&P. RootCursor"    Module FvwmForm FvwmForm-RootCursor
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   256
+ "&S. Setup"         Module FvwmForm FvwmForm-Setup
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   257
+ "&T. Talk Form"     Module FvwmForm FvwmForm-Talk
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   258
+ "&Q. QuitVerify"    Module FvwmForm FvwmForm-QuitVerify
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   259
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   260
# Configure and start using an iconbox on the fly
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   261
DestroyFunc FuncFvwmConfigureIconBox
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   262
AddToFunc FuncFvwmConfigureIconBox
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   263
+ I Module FvwmIconBox
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   264
+ I Style     *  NoIcon
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   265
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   266
DestroyMenu MenuFvwmQuitVerify
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   267
AddToMenu MenuFvwmQuitVerify "$[gt.Really Quit Fvwm?]" Title
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   268
+ "&Q. $[gt.Yes, Really Quit]" Quit
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   269
+ ""                     Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   270
+ "&R. $[gt.Restart]"          Restart
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   271
+ ""                     Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   272
+ "&T. $[gt.Start] twm"        Restart twm
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   273
+ "&C. $[gt.Start] ctwm"       Restart ctwm
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   274
+ "&2. $[gt.Start] tvtwm"      Restart tvtwm
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   275
+ "&V. $[gt.Start] vtwm"       Restart vtwm
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   276
+ "&M. $[gt.Start] mwm"        Restart mwm
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   277
+ "&O. $[gt.Start] olwm"       Restart /usr/openwin/bin/olwm
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   278
+ ""                     Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   279
+ "&X. $[gt.Just an Xterm]"    Restart xterm -n '"X Console"' -T '"X Console"'
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   280
+ ""                     Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   281
+ "&N. $[gt.No, Don't Quit]"   Nop
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   282
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   283
######################## Sample Functions ##########################
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   284
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   285
DestroyFunc FuncFvwmMailXmh
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   286
AddToFunc FuncFvwmMailXmh
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   287
+ I Next [$0] Iconify false
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   288
+ I Next [$0] Focus
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   289
+ I None [$0] Exec $0 $1
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   290
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   291
DestroyFunc FuncFvwmMoveOrRaise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   292
AddToFunc FuncFvwmMoveOrRaise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   293
+ I Raise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   294
+ M Move
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   295
+ D Lower
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   296
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   297
DestroyFunc FuncFvwmMaximize
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   298
AddToFunc FuncFvwmMaximize
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   299
+ M Maximize   0 100
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   300
+ H Maximize   0 100
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   301
+ C Maximize   0  80
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   302
+ D Maximize 100 100
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   303
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   304
DestroyFunc FuncFvwmMoveOrIconify
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   305
AddToFunc FuncFvwmMoveOrIconify
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   306
+ I Raise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   307
+ M Move
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   308
+ D Iconify
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   309
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   310
DestroyFunc FuncFvwmResizeOrRaise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   311
AddToFunc FuncFvwmResizeOrRaise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   312
+ I Raise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   313
+ M Resize
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   314
+ D Lower
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   315
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   316
DestroyFunc FuncFvwmPrint
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   317
AddToFunc FuncFvwmPrint
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   318
+ I Raise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   319
+ I Exec xdpr -id $w
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   320
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   321
DestroyFunc FuncFvwmPrintReverse
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   322
AddToFunc FuncFvwmPrintReverse
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   323
+ I Raise
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   324
+ I Exec xdpr 1/2 -h -rv -id $w
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   325
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   326
DestroyFunc FuncFvwmFocusPolicyChange
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   327
AddToFunc FuncFvwmFocusPolicyChange
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   328
+ I Style * $0
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   329
+ I Recapture
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   330
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   331
# Read config files for modules:
342
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
   332
# read ConfigFvwmBacker
341
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   333
read ConfigFvwmButtons
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   334
read ConfigFvwmIconBox
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   335
read ConfigFvwmIconMan
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   336
read ConfigFvwmIdent
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   337
read ConfigFvwmPager
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   338
read ConfigFvwmScroll
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   339
read ConfigFvwmTaskBar
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   340
read ConfigFvwmWinList
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   341
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   342
# Local variables:
gavenkoa@gavenko.bifit.int
parents:
diff changeset
   343
# comment-start: "# "
342
e071a639eaf7 Added media players list, some docs.
gavenkoa@gavenko.bifit.int
parents: 341
diff changeset
   344
# End: