X-Git-Url: https://git.phdru.name/?a=blobdiff_plain;f=.fvwm%2Fmain.m4;h=6e31301edb85f99c07d2122f8f8fd179346179ec;hb=ebaf0d7b9fd7532eca14748c4d5a47413c5e5255;hp=4230801daf914bcffb6b822fe87f98ff0dce0f45;hpb=7162492f72c363a0b145b8f28b08d41b55511753;p=dotfiles.git diff --git a/.fvwm/main.m4 b/.fvwm/main.m4 index 4230801..6e31301 100644 --- a/.fvwm/main.m4 +++ b/.fvwm/main.m4 @@ -32,6 +32,7 @@ define(`MEDIUM_FONT', `xft:Sans:size=14') define(`BIG_FONT', `xft:Sans:size=16') define(`LARGE_FONT', `xft:Sans:size=18') define(`HUGE_FONT', `xft:Sans:size=20') +define(`GIGANTIC_FONT', `xft:Sans:size=22') dnl Bold TT fonts define(`SMALL_BOLD_FONT', SMALL_FONT`:Bold') @@ -54,8 +55,8 @@ define(`BUTTONS_FONT', PAGER_FONT) define(`MENU_FONT', -ifelse(eval(WIDTH < 1024), 1, `xft:Sans:size=16', - eval(WIDTH < 1920), 1, `xft:Sans:size=18', `xft:Sans:size=22')) +ifelse(eval(WIDTH < 1024), 1, BIG_FONT, + eval(WIDTH < 1920), 1, LARGE_FONT, GIGANTIC_FONT)) define(`IDENT_FONT', MENU_FONT) define(`WIN_LIST_FONT', MENU_FONT) define(`ICON_BOX_FONT', MENU_FONT) @@ -91,17 +92,23 @@ define(`TERM_KOI8_BOTRT', `TERM_KOI8 -geometry TERM_GEOM_BOTRT') define(`TERM_UTF8_BOTRT', `TERM_UTF8 -geometry TERM_GEOM_BOTRT') +define(`REMOTE_HOST_TERM', +`$1 -e ssh -4 $2') + +define(`REMOTE_HOST_TERM_TITLE', +`$1 -title $3 -n $3 -e ssh -4 $2') + define(`REMOTE_HOST_KOI8', -`TERM_KOI8 -title "$2" -n "$2" -e ssh -4 "$1"') +REMOTE_HOST_TERM_TITLE(TERM_KOI8, $1, $2)) define(`REMOTE_HOST_KOI8_MENU', "$2 (koi8)" REMOTE_HOST_KOI8($1, $2)) define(`REMOTE_HOST_KOI8_BOTLT', -TERM_KOI8_BOTLT -title "$2" -n "$2" -e ssh -4 "$1") +REMOTE_HOST_TERM_TITLE(TERM_KOI8_BOTLT, $1, $2)) define(`REMOTE_HOST_KOI8_BOTRT', -`TERM_KOI8_BOTRT -title "$2" -n "$2" -e ssh -4 "$1"') +REMOTE_HOST_TERM_TITLE(TERM_KOI8_BOTRT, $1, $2)) define(`REMOTE_HOST_KOI8_BOTLT_MENU', "$2 (koi8,btlt)" REMOTE_HOST_KOI8_BOTLT($1, $2)) @@ -110,16 +117,16 @@ define(`REMOTE_HOST_KOI8_BOTRT_MENU', "$2 (koi8,btrt)" REMOTE_HOST_KOI8_BOTRT($1, $2)) define(`REMOTE_HOST_UTF8', -TERM_UTF8 -e ssh -4 "$1") +REMOTE_HOST_TERM(TERM_UTF8, $1)) define(`REMOTE_HOST_UTF8_MENU', "$2 (utf8)" REMOTE_HOST_UTF8($1, $2)) define(`REMOTE_HOST_UTF8_BOTLT', -TERM_UTF8_BOTLT -e ssh -4 "$1") +REMOTE_HOST_TERM(TERM_UTF8_BOTLT, $1)) define(`REMOTE_HOST_UTF8_BOTRT', -TERM_UTF8_BOTRT -e ssh -4 "$1") +REMOTE_HOST_TERM(TERM_UTF8_BOTRT, $1)) define(`REMOTE_HOST_UTF8_BOTLT_MENU', "$2 (utf8,btlt)" REMOTE_HOST_UTF8_BOTLT($1, $2)) @@ -132,6 +139,7 @@ TERM_KOI8 -geometry TERM_GEOM_BIG -title "$2" -n "$2" -e ssh -4 "$1") define(`REMOTE_HOST_KOI8_BIG_MENU', "$2 (koi8)" REMOTE_HOST_KOI8_BIG($1, $2)) + divert ########################################################################## @@ -139,7 +147,7 @@ divert # # Colon seperated unix directory paths for Modules, xpm files, and bitmaps #ModulePath /usr/lib/fvwm -ImagePath /usr/share/pixmaps/fvwm:/usr/share/pixmaps:/usr/include/X11/bitmaps #:/usr/local/firefox/chrome/icons/default:/usr/local/firefox/icons +ImagePath /usr/share/pixmaps/fvwm:/usr/share/pixmaps:/usr/include/X11/bitmaps #:/usr/local/firefox/browser/chrome/icons/default:/usr/local/firefox/browser/icons ############################################################################ # COLORS and FONTS @@ -259,6 +267,7 @@ Style "*Pidgin*" MinOverlapPercentPlacement # (S)MPlayer Style "*MPlayer*" Layer 6, PositionPlacement 350p 100p +Style "*mpv" Layer 6, PositionPlacement 350p 100p Style "*clock" !Title, Sticky, WindowListSkip, Color Black/#40c040, NeverFocus, PositionPlacement 50-50w +1p, Layer 2 Style "emacs" NoPPosition @@ -482,6 +491,8 @@ AddToFunc StartStandardSession + I Wait TERM + I PaVuControl + I Exec exec "$HOME"/current/projects/audio-cdr-video/audio/pa-mic-off ++ I XsetbgFilename ++ I Wait gxmessage + I GotoDeskAndPage 1 0 1 + I TERM_KOI8 + I Wait TERM @@ -503,7 +514,7 @@ AddToFunc ResumeFunction + I Wait TERM + I None ("Volume Control") PaVuControl + 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 XsetbgFilename + I Wait gxmessage + I Any ("*Mozilla Firefox") GotoDeskAndPage 0 1 0 + I TestRc (Match) Break @@ -583,7 +594,7 @@ AddToFunc PaVuControl I GotoDeskAndPage 0 1 1 changequote([,]) 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 - +AddToFunc Id3Info I Exec "$HOME"/lib/audio/mp3/id3info.py "`deadbeef --nowplaying '%F'`" | text-wrap.py | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file - changequote([`], [']) DestroyFunc DeadBeef @@ -603,8 +614,8 @@ AddToFunc FireFox I Any ("*Mozilla Firefox") Break + I GotoDeskAndPage 1 0 0 + I Exec exec start-browser 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 All ("*Mozilla Firefox") Iconify true ++ I Exec webbrowserX -n file:///home/phd/Internet/WWW/dashboard/index.html + I Wait "*Mozilla Firefox" DestroyFunc Gajim @@ -615,6 +626,9 @@ DestroyFunc Pidgin AddToFunc Pidgin I GotoDeskAndPage 1 1 0 + I Exec exec pidgin +DestroyFunc XFilename +AddToFunc XSetbgFilename I Exec "$HOME"/current/projects/xsetbg/print-filename.py | text-wrap.py -w TEXT_WIDTH -s | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file - + ############################################################################## # MENU Setup # @@ -663,6 +677,7 @@ AddToMenu Terminals "Terminals" Title + "Grey term (utf8,btlt)" TERM_UTF8_BOTLT + "Grey term (utf8,btrt)" TERM_UTF8_BOTRT + "Big grey term (koi8)" TERM_KOI8 -geometry TERM_GEOM_BIG ++ "Big grey term (utf8)" TERM_UTF8 -geometry TERM_GEOM_BIG + "" Nop + "White/black term (koi8)" TERM_KOI8 -fg white -cr white -bg black + "White/black term (utf8)" TERM_UTF8 -fg white -bg black @@ -774,8 +789,6 @@ AddToMenu Utilities "Choose one:" Title + "" Nop + "GVim" Exec exec gvim + "" Nop -+ "MyRuLb" Exec 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 @@ -840,16 +853,16 @@ changequote([,]) + "Xli (scaled)" Exec fn="`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r`" && exec xli -title "`echo $fn | sed 's/ /_/g'`" -zoom auto "$fn" + "Open in browser" Exec exec webbrowserX -n "`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r`" + "Filename" Exec exec "$HOME"/current/projects/xsetbg/print-filename.py -e koi8-r -+ "XFilename" Exec "$HOME"/current/projects/xsetbg/print-filename.py | text-wrap.py -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file - -+ "XFilename (wrapped)" 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 - ++ "XFilename" Exec "$HOME"/current/projects/xsetbg/print-filename.py | text-wrap.py | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file - ++ "XFilename (wrapped)" XSetbgFilename + "" Nop + "Xli (prev.)" Exec fn="`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r 1`" && exec xli -title "`echo $fn | sed 's/ /_/g'`" "$fn" + "Xli (prev., scaled)" Exec fn="`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r 1`" && exec xli -title "`echo $fn | sed 's/ /_/g'`" -zoom auto "$fn" + "Open in browser (prev.)" Exec exec webbrowserX -n "`$HOME/current/projects/xsetbg/print-filename.py -e koi8-r 1`" changequote([`], [']) + "Filename (prev.)" Exec exec "$HOME"/current/projects/xsetbg/print-filename.py -e koi8-r 1 -+ "XFilename (prev.)" Exec "$HOME"/current/projects/xsetbg/print-filename.py 1 | text-wrap.py -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file - -+ "XFilename (prev., wrapped)" Exec "$HOME"/current/projects/xsetbg/print-filename.py 1 | text-wrap.py -w TEXT_WIDTH -s -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file - ++ "XFilename (prev.)" Exec "$HOME"/current/projects/xsetbg/print-filename.py 1 | text-wrap.py | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file - ++ "XFilename (prev., wrapped)" Exec "$HOME"/current/projects/xsetbg/print-filename.py 1 | text-wrap.py -w TEXT_WIDTH -s | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file - ############################################################################ # FvwmBacker @@ -895,8 +908,8 @@ pushdef(`TERM_UTF8', `Exec "URxvt" exec "$HOME"/lib/X11/utf8rxvt') *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 1 | text-wrap.py -w TEXT_WIDTH -s -n | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file -) +*FvwmButtons: (Title Wallpaper, Icon find1.xpm, Action Exec "gxmessage" "$HOME"/current/projects/xsetbg/print-filename.py | text-wrap.py -w TEXT_WIDTH -s | 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 1 | text-wrap.py -w TEXT_WIDTH -s | 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 Exec "Volume Control" exec pavucontrol) #*FvwmButtons: (Title Id3Info, Icon bell.xpm, Action Id3Info)