X-Git-Url: https://git.phdru.name/?a=blobdiff_plain;f=.fvwm%2Fphd.m4;h=b9dbe42fe6f69c754f84d363ae12bd0483228cd7;hb=2d2048f5ff5f0ce412d6d60bce2b3da3214d8d07;hp=a923b6492b57d952ba1f784162676be7dddf9cba;hpb=eab2f1a94b81c4b67db9405febc66f2c3329a2bc;p=dotfiles.git

diff --git a/.fvwm/phd.m4 b/.fvwm/phd.m4
index a923b64..b9dbe42 100644
--- a/.fvwm/phd.m4
+++ b/.fvwm/phd.m4
@@ -232,7 +232,8 @@ Style * BorderWidth 5, HandleWidth 5, Icon unknown1.xpm
 Style * DecorateTransient, ClickToFocusRaisesOff
 
 Style "Fvwm*"           !Title, Sticky, WindowListSkip
-Style "FvwmButtons"     !Handles, BorderWidth 0
+Style "FvwmButtons"     !Handles, BorderWidth 0, Layer 2
+Style "FvwmPager"       Layer 2
 
 # Terminals
 Style "*term"           Icon term.xpm
@@ -259,7 +260,7 @@ Style "*Pidgin*"        MinOverlapPercentPlacement
 # (S)MPlayer
 Style "*MPlayer*"       Layer 6, PositionPlacement 350p 100p
 
-Style "*clock"          !Title, Sticky, WindowListSkip, Color Black/#40c040, NeverFocus, PositionPlacement 50-50w +1p
+Style "*clock"          !Title, Sticky, WindowListSkip, Color Black/#40c040, NeverFocus, PositionPlacement 50-50w +1p, Layer 2
 Style "emacs"           NoPPosition
 Style "gxmessage"       PositionPlacement 50-50w +20
 Style "*lock"           !Title, Sticky, WindowListSkip
@@ -481,20 +482,18 @@ AddToFunc StartStandardSession
 +              I Wait TERM
 +              I PaVuControl
 +              I Exec exec "$HOME"/current/projects/audio-cdr-video/audio/pa-mic-off
-+              I FireFox
 +              I GotoDeskAndPage 1 0 1
 +              I TERM_KOI8
 +              I Wait TERM
++              I GotoDeskAndPage 1 1 0
++              I TERM_UTF8 -iconic -name term-im-remote
++              I Wait term-im-remote
++              I TERM_KOI8 -geometry 60x25-5-5 -iconic -name term-im-local
++              I Wait term-im-local
 +              I GotoDeskAndPage 2 0 1
 +              I TERM_KOI8 -geometry TERM_GEOM_BIG
 +              I Wait TERM
-+              I Gajim
-+              I Wait Gajim
-+              I TERM_UTF8 -iconic -name term-im-remote
-+              I Wait URxvt
-+              I TERM_KOI8 -geometry 60x25-5-5 -iconic -name term-im-local
-+              I Wait URxvt
-+              I GotoDeskAndPage 1 1 0
++              I FireFox
 +              I Schedule 1000 GotoDeskAndPage 0 1 0
 
 DestroyFunc ResumeFunction
@@ -571,7 +570,7 @@ AddToFunc PrintFunction         I Raise
 +                               I Exec exec xdpr -id $w
 
 DestroyFunc Raise-All
-AddToFunc Raise-All           I All (!"FvwmButtons|System|*clock") Raise
+AddToFunc Raise-All           I All Raise
 
 ##############################################################################
 # User-defined functions
@@ -772,16 +771,20 @@ DestroyMenu  Utilities
 AddToMenu Utilities     "Choose one:" Title
 +                       "qPDFview" Exec exec qpdfview
 +                       "FBReader" Exec exec fbreader
++                       ""       Nop
 +                       "GVim (koi8)" Exec LC_CTYPE=ru_RU.KOI8-R exec gvim
 +                       "GVim (utf8)" Exec LC_CTYPE=ru_RU.UTF-8  exec gvim
++                       ""       Nop
 +                       "MyRuLb (koi8)" Exec LC_CTYPE=ru_RU.KOI8-R exec "$HOME"/admin/prog/myrulib/myrulib
 +                       "MyRuLb (utf8)" Exec LC_CTYPE=ru_RU.UTF-8  exec "$HOME"/admin/prog/myrulib/myrulib
++                       ""       Nop
 #+                       "XFortune" Exec /usr/games/fortune | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -
 #+                       "xbuffy" Exec exec xbuffy -fn 'XBUFFY_FONT' -geometry +0+125 -boxfile mail/misc/.xbuffyrc
 +                       ""       Nop
 +                       "pavucontrol" PaVuControl
 +                       "DeadBeef"    DeadBeef
 +                       "Id3Info"     Id3Info
++                       ""       Nop
 +                       "Gajim"       Gajim
 +                       "Pidgin"      Pidgin
 +                       ""       Nop
@@ -791,7 +794,7 @@ AddToMenu Utilities     "Choose one:" Title
 +                       "Refresh Screen" Refresh
 +                       "xrefresh" Exec exec xrefresh
 +                       ""       Nop
-+                       "xcalc" Exec exec xcalc
+#+                       "xcalc" Exec exec xcalc
 +                       "xclipboard" Exec exec xclipboard
 +                       "xcutsel" Exec exec xcutsel
 #+                       "xman" Exec exec xman -notopbox -geometry +150+102