aboutsummaryrefslogtreecommitdiff
path: root/recipes/Dakkar
diff options
context:
space:
mode:
Diffstat (limited to 'recipes/Dakkar')
-rw-r--r--recipes/Dakkar35
1 files changed, 24 insertions, 11 deletions
diff --git a/recipes/Dakkar b/recipes/Dakkar
index d579a88..8ed0aa3 100644
--- a/recipes/Dakkar
+++ b/recipes/Dakkar
@@ -1,6 +1,9 @@
Include components/functions/Music
Include components/functions/Screen-Menu
Include components/functions/Numpad-multihead
+Include components/functions/Gather
+
+Module FvwmCommandS
InfoStoreAdd DeskIconsSign " "
LoadPreferences IconsType
@@ -29,15 +32,15 @@ Style * StickyIcon
Module FvwmAuto 300 -passid -menterleave \
- "Silent raise_pager" \
- "Silent lower_pager"
+ "Silent Raise_Pager" \
+ "Silent Lower_Pager"
-DestroyFunc lower_pager
-AddToFunc lower_pager
+DestroyFunc Lower_Pager
+AddToFunc Lower_Pager
+ I WindowId $0 (FvwmPager|mwatch) Layer 0 2
-DestroyFunc raise_pager
-AddToFunc raise_pager
+DestroyFunc Raise_Pager
+AddToFunc Raise_Pager
+ I WindowId $0 (FvwmPager|mwatch) Layer 0 7
DestroyFunc FvwmPagerWindow
@@ -45,7 +48,7 @@ AddToFunc FvwmPagerWindow
+ I All (FvwmPager) Close
+ I DestroyModuleConfig FvwmPager: *
+ I PipeRead 'echo InfoStoreAdd FvwmPager_Width $((28*$[infostore.Desk_Pages_X])); echo InfoStoreAdd FvwmPager_Height $((24*$[infostore.Desk_Pages_Y]))'
-+ I PipeRead 'echo *FvwmPager: Geometry $[infostore.FvwmPager_Width]x$[infostore.FvwmPager_Height]+$((($[vp.width]-$[infostore.FvwmPager_Width])/2))'
++ I PipeRead 'echo *FvwmPager: Geometry $[infostore.FvwmPager_Width]x$[infostore.FvwmPager_Height]+$(((1920-$[infostore.FvwmPager_Width])/2))'
+ I *FvwmPager: MiniIcons
+ I *FvwmPager: Font none
+ I *FvwmPager: WindowBorderWidth 1
@@ -58,12 +61,12 @@ AddToFunc FvwmPagerWindow
FvwmPagerWindow
-FvwmTrayerPanel request pixel "24" top right "248" "4"
+FvwmTrayerPanel request pixel "24" top right "420" "4"
Style trayer UseStyle FvwmParts
All (FvwmButtons-Panel) Close
DestroyModuleConfig FvwmButtons-Panel: *
-*FvwmButtons-Panel: Geometry -3+3
+*FvwmButtons-Panel: Geometry -3+3@p
*FvwmButtons-Panel: BoxSize smart
*FvwmButtons-Panel: ActiveColorset $[infostore.cs_panel_active]
*FvwmButtons-Panel: Colorset $[infostore.cs_panel_inactive]
@@ -86,6 +89,8 @@ Action (Mouse 3) Window-List-Icons "$[MenuPosition_SW]")
*FvwmButtons-Panel: (1x1, Size 22 22, Icon "22x22/fvwm-crystal/applications.png", \
Action (Mouse 1) Menu /Applications $[MenuPosition_SW])
+*FvwmButtons-Panel: (7x1, Size 165 24, Swallow (Close, Respawn) "dakkar-battery" `Exec /home/dakkar/src/battery/battery`)
+
*FvwmButtons-Panel: (7x1, Size 154 24, \
Swallow (Close, Respawn, FvwmModule) "FvwmScript-Clock" 'Script components/scripts/FvwmScript-Clock', \
Action (Mouse 3) SendToModule *FvwmScript-Clock SendString 1 1 str)
@@ -99,7 +104,15 @@ AddToFunc StartFunction
+ I Style mwatch !FixedPosition
+ I Style gkrellm !FixedPosition
+ I UpdateStyles
-+ I All (mwatch) Move -0 +30p
-+ I All (gkrellm) Move -0 -0
++ I All (mwatch) Move screen p -0 +30p
++ I All (gkrellm) Move screen p -0 -0
+ I Style mwatch FixedPosition
+ I Style gkrellm FixedPosition
+
+DestroyMenu /Keymap
+AddToMenu /Keymap
++ 'Dvorak' Exec /home/dakkar/bin/kbd-dakkar
++ 'QWERTY' Exec /home/dakkar/bin/kbd-qw
+
+AddToMenu /FVWM-Crystal
++ 'Keymap' Popup /Keymap