1 # -*- mode: fvwm; fill-column: 90 -*- |
1 # -*- mode: fvwm; fill-column: 90 -*- |
2 |
|
3 ############################ |
|
4 # Set Environment variables. |
|
5 ############################ |
|
6 |
|
7 SetEnv fvwm_img $[FVWM_USERDIR]/images |
|
8 SetEnv fvwm_icon $[FVWM_USERDIR]/icons |
|
9 SetEnv screenshot_home $[HOME]/.screenshot |
|
10 |
2 |
11 ################################################################ |
3 ################################################################ |
12 # Set paths. |
4 # Set paths. |
13 |
5 |
|
6 m4_define(`m4_IMGPATH', `$[FVWM_USERDIR]/images')m4_dnl |
|
7 m4_define(`m4_ICONPATH', `$[FVWM_USERDIR]/icons')m4_dnl |
|
8 |
14 ModulePath $[FVWM_USERDIR]:+ |
9 ModulePath $[FVWM_USERDIR]:+ |
15 ImagePath $[fvwm_icon];.xpm:$[fvwm_img]:+ |
10 ImagePath m4_ICONPATH;.xpm:m4_IMGPATH:+ |
16 |
11 |
17 # ################# |
12 # ################# |
18 # Virtual Desktops. |
13 # Virtual Desktops. |
19 # ################# |
14 # ################# |
20 |
15 |
64 |
59 |
65 ########################################## |
60 ########################################## |
66 # Screenshot Functions (uses ImageMagick). |
61 # Screenshot Functions (uses ImageMagick). |
67 ########################################## |
62 ########################################## |
68 |
63 |
|
64 m4_define(`m4_SCREENSHOTPATH', `$[HOME]/.screenshot')m4_dnl |
|
65 m4_changequote(`<--', `-->')m4_dnl |
|
66 |
69 DestroyFunc FvwmWindowScreenshot |
67 DestroyFunc FvwmWindowScreenshot |
70 AddToFunc FvwmWindowScreenshot |
68 AddToFunc FvwmWindowScreenshot |
71 + I Exec import -window $[w.id] -quality 100 -silent \ |
69 + I Exec import -window $[w.id] -quality 100 -silent \ |
72 "$[screenshot_home]/$[w.class]-`date +%F[%R]`.png" |
70 "m4_SCREENSHOTPATH/$[w.class]-`date +%F[%R]`.png" |
73 |
71 |
74 # Remember there is 5 seconds pause before screenshot makes! |
72 # Remember there is 5 seconds pause before screenshot makes! |
75 # For alternative screenshot command with delay you may use: scrot -d <sec> <file> |
73 # For alternative screenshot command with delay you may use: scrot -d <sec> <file> |
76 DestroyFunc FvwmDesktopScreenshot |
74 DestroyFunc FvwmDesktopScreenshot |
77 AddToFunc FvwmDesktopScreenshot |
75 AddToFunc FvwmDesktopScreenshot |
78 + I Exec import -window root -quality 100 -pause 5 -silent \ |
76 + I Exec import -window root -quality 100 -pause 5 -silent \ |
79 "$[screenshot_home]/Desktop-`date +%F-[%H:%M:%S]`.png" |
77 "m4_SCREENSHOTPATH/Desktop-`date +%F-[%H:%M:%S]`.png" |
80 |
78 |
81 DestroyFunc FvwmScreenshot |
79 DestroyFunc FvwmScreenshot |
82 AddToFunc FvwmScreenshot |
80 AddToFunc FvwmScreenshot |
83 + I Exec import -quality 100 -silent \ |
81 + I Exec import -quality 100 -silent \ |
84 "$[screenshot_home]/App-`date +%F-[%H:%M:%S]`.png" |
82 "m4_SCREENSHOTPATH/App-`date +%F-[%H:%M:%S]`.png" |
|
83 |
|
84 m4_changequote`'m4_dnl |
85 |
85 |
86 ################## |
86 ################## |
87 # Basic Functions. |
87 # Basic Functions. |
88 ################## |
88 ################## |
89 |
89 |
179 + I Raise |
179 + I Raise |
180 # Place mouse pointer in center of window. |
180 # Place mouse pointer in center of window. |
181 + I WarpToWindow 50 50 |
181 + I WarpToWindow 50 50 |
182 |
182 |
183 # Prevent show long title. |
183 # Prevent show long title. |
184 SetEnv fvwm_winlist_width 60 |
184 m4_define(`m4_WINLIST_WIDTH', `60')m4_dnl |
185 # Define switch between aps. |
185 # Define switch between aps. |
186 Key Tab A M WindowList Root c c NoDeskSort, MaxLabelWidth $[fvwm_winlist_width], SelectOnRelease Meta_L |
186 Key Tab A M WindowList Root c c NoDeskSort, MaxLabelWidth m4_WINLIST_WIDTH, SelectOnRelease Meta_L |
187 Key Tab A 3 WindowList Root c c NoDeskSort, MaxLabelWidth $[fvwm_winlist_width] |
187 Key Tab A 3 WindowList Root c c NoDeskSort, MaxLabelWidth m4_WINLIST_WIDTH |
188 |
188 |
189 # Close window on Alt+F4 (send SIGHUP). |
189 # Close window on Alt+F4 (send SIGHUP). |
190 Key F4 A M Delete |
190 Key F4 A M Delete |
191 |
191 |
192 # Make screenshot. |
192 # Make screenshot. |
359 # No any button on pager. |
359 # No any button on pager. |
360 Style "FvwmPager" !Button 1, !Button 3, !Button 5, \ |
360 Style "FvwmPager" !Button 1, !Button 3, !Button 5, \ |
361 StaysOnTop, Sticky, FixedPosition, FixedSize, !Iconifiable, \ |
361 StaysOnTop, Sticky, FixedPosition, FixedSize, !Iconifiable, \ |
362 WindowListSkip, CirculateSkip |
362 WindowListSkip, CirculateSkip |
363 |
363 |
364 SetEnv FvwmPager_Inactive rgb:c0/c0/c0 |
364 m4_define(`m4_PagerInactiveRGB', `rgb:c0/c0/c0')m4_dnl |
365 SetEnv FvwmPager_Active rgb:ef/df/bdc |
365 m4_define(`m4_PagerActiveRGB', `rgb:ef/df/bdc')m4_dnl |
366 |
366 |
367 DestroyModuleConfig FvwmPager: * |
367 DestroyModuleConfig FvwmPager: * |
368 *FvwmPager: Back $[FvwmPager_Inactive] |
368 *FvwmPager: Back m4_PagerInactiveRGB |
369 *FvwmPager: BalloonBack $[FvwmPager_Active] |
369 *FvwmPager: BalloonBack m4_PagerActiveRGB |
370 *FvwmPager: Hilight $[FvwmPager_Active] |
370 *FvwmPager: Hilight m4_PagerActiveRGB |
371 *FvwmPager: Geometry 80x500-0+0 |
371 *FvwmPager: Geometry 80x500-0+0 |
372 *FvwmPager: WindowColors $[FvwmPager_Inactive] $[FvwmPager_Inactive] $[FvwmPager_Active] $[FvwmPager_Active] |
372 *FvwmPager: WindowColors m4_PagerInactiveRGB m4_PagerInactiveRGB m4_PagerActiveRGB m4_PagerActiveRGB |
373 *FvwmPager: Font "xft:Sans:Bold:pixelsize=12:minspace=True:antialias=True" |
373 *FvwmPager: Font "xft:Sans:Bold:pixelsize=12:minspace=True:antialias=True" |
374 *FvwmPager: Balloons All |
374 *FvwmPager: Balloons All |
375 *FvwmPager: BalloonFont "-Misc-Fixed-Medium-R-Normal-*-13-*-*-*-*-*-ISO10646-1" |
375 *FvwmPager: BalloonFont "-Misc-Fixed-Medium-R-Normal-*-13-*-*-*-*-*-ISO10646-1" |
376 *FvwmPager: MiniIcons |
376 *FvwmPager: MiniIcons |
377 *FvwmPager: UseSkipList |
377 *FvwmPager: UseSkipList |