X-Git-Url: https://git.phdru.name/?a=blobdiff_plain;f=.fvwm%2Fphd.m4;h=e482a7001542d6591f84307049c0baa7a9d25c35;hb=956225f90ae9160de3b4f87041dc7979364114ba;hp=b7d27b046e8c9dd4a804e93105c4e09f4355b847;hpb=4d2ea787dd39c72761efa00ff3bebbf84555ba04;p=dotfiles.git diff --git a/.fvwm/phd.m4 b/.fvwm/phd.m4 index b7d27b0..e482a70 100644 --- a/.fvwm/phd.m4 +++ b/.fvwm/phd.m4 @@ -85,14 +85,14 @@ ifelse(eval(WIDTH < 1024), 1, `96x30', define(`TERM', `urxvt') define(`TERM_KOI8', `Exec LC_CTYPE=ru_RU.KOI8-R exec TERM') define(`TERM_UTF8', `Exec exec "$HOME"/lib/X11/utf8rxvt') -define(`TERM_KOI8_BOTLT', `Exec LC_CTYPE=ru_RU.KOI8-R exec TERM -geometry TERM_GEOM_BOTLT') -define(`TERM_UTF8_BOTLT', `Exec exec "$HOME"/lib/X11/utf8rxvt -geometry TERM_GEOM_BOTLT') -define(`TERM_KOI8_BOTRT', `Exec LC_CTYPE=ru_RU.KOI8-R exec TERM -geometry TERM_GEOM_BOTRT') -define(`TERM_UTF8_BOTRT', `Exec exec "$HOME"/lib/X11/utf8rxvt -geometry TERM_GEOM_BOTRT') +define(`TERM_KOI8_BOTLT', `TERM_KOI8 -geometry TERM_GEOM_BOTLT') +define(`TERM_UTF8_BOTLT', `TERM_UTF8 -geometry TERM_GEOM_BOTLT') +define(`TERM_KOI8_BOTRT', `TERM_KOI8 -geometry TERM_GEOM_BOTRT') +define(`TERM_UTF8_BOTRT', `TERM_UTF8 -geometry TERM_GEOM_BOTRT') define(`REMOTE_HOST_KOI8', -TERM_KOI8 -title "$2" -n "$2" -e ssh -4 "$1") +`TERM_KOI8 -title "$2" -n "$2" -e ssh -4 "$1"') define(`REMOTE_HOST_KOI8_MENU', "$2 (koi8)" REMOTE_HOST_KOI8($1, $2)) @@ -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 @@ -586,18 +586,10 @@ DestroyFunc Id3Info AddToFunc Id3Info I Exec "$HOME"/lib/audio/mp3/id3info.py "`deadbeef --nowplaying '%F'`" | text-wrap.py -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file - changequote([`], [']) -#DestroyFunc Audacious -#AddToFunc Audacious I GotoDeskAndPage 0 1 1 -#+ I Exec LC_CTYPE=ru_RU.UTF-8 exec audacious - DestroyFunc DeadBeef AddToFunc DeadBeef I GotoDeskAndPage 0 1 1 + I Exec exec deadbeef -DestroyFunc SMPlayer -AddToFunc SMPlayer I GotoDeskAndPage 0 1 1 -+ I Exec exec smplay -no-close-at-end - DestroyFunc Term-Phdru AddToFunc Term-Phdru I GotoDeskAndPage 1 0 1 + I REMOTE_HOST_KOI8(phdru.name, phdru.name) @@ -610,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 @@ -785,7 +776,6 @@ AddToMenu Utilities "Choose one:" Title #+ "xbuffy" Exec exec xbuffy -fn 'XBUFFY_FONT' -geometry +0+125 -boxfile mail/misc/.xbuffyrc + "" Nop + "pavucontrol" PaVuControl -#+ "audacious" Audacious + "DeadBeef" DeadBeef + "Id3Info" Id3Info + "Gajim" Gajim @@ -893,18 +883,19 @@ changequote([`], [']) #*FvwmButtons: (Swallow XClock 'Exec exec xclock -update 1 -geometry -3000-3000') # Buttons +pushdef(`TERM_KOI8', `Exec "TERM" LC_CTYPE=ru_RU.KOI8-R exec TERM') +pushdef(`TERM_UTF8', `Exec "URxvt" exec "$HOME"/lib/X11/utf8rxvt') *FvwmButtons: (Title Term, Icon rterm2.xpm, Action TERM_KOI8) *FvwmButtons: (Title UTF-8, Icon rterm2.xpm, Action TERM_UTF8) -*FvwmButtons: (Title phdru, Icon xterm-sgi.xpm, Action Term-Phdru) +*FvwmButtons: (Title phdru, Icon xterm-sgi.xpm, Action REMOTE_HOST_KOI8(phdru.name, phdru.name)) +popdef(`TERM_KOI8', `TERM_UTF8') *FvwmButtons: (Title Wallpaper, Icon find1.xpm, Action Exec "gxmessage" "$HOME"/current/projects/xsetbg/print-filename.py | text-wrap.py -w TEXT_WIDTH -s -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -) *FvwmButtons: (Title "-1", Icon find1.xpm, Action Exec "gxmessage" "$HOME"/current/projects/xsetbg/print-filename.py -o | text-wrap.py -w TEXT_WIDTH -s -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -) *FvwmButtons: (Title Next, Icon Jrecycle.xpm, Action Exec exec "$HOME"/current/projects/xsetbg/xsetbg-http-force) -*FvwmButtons: (Title pavucontrol, Icon mini.sound.xpm, Action PaVuControl) +*FvwmButtons: (Title pavucontrol, Icon mini.sound.xpm, Action Exec "Volume Control" exec pavucontrol) #*FvwmButtons: (Title Id3Info, Icon bell.xpm, Action Id3Info) -#*FvwmButtons: (Title Audacious, Icon bell.xpm, Action Audacious) -*FvwmButtons: (Title DeadBeef, Icon bell.xpm, Action DeadBeef) -#*FvwmButtons: (Title SMPlayer, Icon bell.xpm, Action SMPlayer) +*FvwmButtons: (Title DeadBeef, Icon bell.xpm, Action Exec "DeaDBeeF-*" exec deadbeef) #*FvwmButtons: (Title XLock, Icon Jxlock.xpm, Action Exec exec xscreensaver-command -lock) ############################################################################