X-Git-Url: https://git.phdru.name/?a=blobdiff_plain;f=.fvwm%2Fphd.m4;h=e482a7001542d6591f84307049c0baa7a9d25c35;hb=956225f90ae9160de3b4f87041dc7979364114ba;hp=a36e11c22bebb7049a0110fb18be4695d463f21c;hpb=6ee35ff265f693a03780ac4dd5171bf8f64b9caf;p=dotfiles.git diff --git a/.fvwm/phd.m4 b/.fvwm/phd.m4 index a36e11c..e482a70 100644 --- a/.fvwm/phd.m4 +++ b/.fvwm/phd.m4 @@ -101,7 +101,7 @@ define(`REMOTE_HOST_KOI8_BOTLT', TERM_KOI8_BOTLT -title "$2" -n "$2" -e ssh -4 "$1") define(`REMOTE_HOST_KOI8_BOTRT', -TERM_KOI8_BOTRT -title "$2" -n "$2" -e ssh -4 "$1") +`TERM_KOI8_BOTRT -title "$2" -n "$2" -e ssh -4 "$1"') define(`REMOTE_HOST_KOI8_BOTLT_MENU', "$2 (koi8,btlt)" REMOTE_HOST_KOI8_BOTLT($1, $2)) @@ -482,7 +482,7 @@ AddToFunc StartStandardSession + I PaVuControl + I Wait "Volume Control" + I Exec exec "$HOME"/current/projects/audio-cdr-video/audio/pa-mic-off -+ I FireFox-Wait ++ I FireFox + I GotoDeskAndPage 1 0 1 + I TERM_KOI8 + I Wait TERM @@ -505,11 +505,11 @@ AddToFunc ResumeFunction + I Wait TERM + I PaVuControl + I Wait "Volume Control" -+ I Exec exec "$HOME"/current/projects/audio-cdr-video/audio/pa-mic-off ++ I Exec sleep 10; exec "$HOME"/current/projects/audio-cdr-video/audio/pa-mic-off + 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 - + I Wait gxmessage -+ I None ("*Mozilla Firefox") FireFox-Wait -+ I GotoDeskAndPage 0 1 0 ++ I None ("*Mozilla Firefox") FireFox ++ I Schedule 2500 GotoDeskAndPage 0 1 0 ############################################################################ # COMPLEX FUNCTIONS @@ -602,10 +602,9 @@ DestroyFunc FireFox AddToFunc FireFox I Any ("*Mozilla Firefox") Break + I GotoDeskAndPage 1 0 0 + I Exec LC_CTYPE=ru_RU.KOI8-R exec start-browser firefox - -DestroyFunc FireFox-Wait -AddToFunc FireFox-Wait I Any ("*Mozilla Firefox") Break -+ I FireFox ++ I Wait "*Mozilla Firefox" ++ I All ("*Mozilla Firefox") Lower ++ I Exec webbrowserX -n file:///home/phd/Internet/WWW/misc/index.html; exec webbrowserX -t file:///home/phd/Internet/WWW/misc/internet.html + I Wait "*Mozilla Firefox" DestroyFunc Gajim