X-Git-Url: https://git.phdru.name/?a=blobdiff_plain;f=.fvwm%2Fmain.m4;h=3fd324ddfdf000692b0b22b567deb3128b2f209f;hb=fe633c1514aca202a7da45fd37d638602bf96734;hp=51e0f2fe353f406a7ce2fe65ba682fab2595a1d4;hpb=791511a208ca32455ba7184f9915a4b1ed227468;p=dotfiles.git diff --git a/.fvwm/main.m4 b/.fvwm/main.m4 index 51e0f2f..3fd324d 100644 --- a/.fvwm/main.m4 +++ b/.fvwm/main.m4 @@ -12,18 +12,6 @@ dnl Echo dimension `#' width = WIDTH divert(-1) -dnl koi8-r Fonts -dnl define(`SMALL_FONT_KOI8', `-*-fixed-medium-r-normal-*-*-100-*-*-*-*-koi8-r') -dnl define(`MEDIUM_FONT_KOI8', `-*-fixed-medium-r-normal-*-*-120-*-*-*-*-koi8-r') -dnl define(`BIG_FONT_KOI8', `-*-fixed-medium-r-normal-*-*-140-*-*-*-*-koi8-r') - -dnl cp1251 Fonts -dnl define(`SMALL_FONT_CP1251', `-*-fixed-medium-r-normal-*-*-100-*-*-*-*-*-cp1251') -dnl define(`MEDIUM_FONT_CP1251', `-*-fixed-medium-r-normal-*-*-120-*-*-*-*-*-cp1251') -dnl define(`BIG_FONT_CP1251', `-*-fixed-medium-r-normal-*-*-140-*-*-*-*-*-cp1251') - -dnl define(`XBUFFY_FONT', `-cronyx-helvetica-bold-r-*-*-*-100-*-*-*-*-koi8-r') - dnl TrueType Fonts define(`VERY_SMALL_FONT', `xft:Sans:size=10') @@ -94,56 +82,56 @@ define(`TERM_KOI8_BOTRT', `TERM_KOI8 -geometry TERM_GEOM_BOTRT') define(`TERM_RU_UTF8_BOTRT', `TERM_RU_UTF8 -geometry TERM_GEOM_BOTRT') -define(`SSH', `cgmem_nice 300 ssh -4') +define(`SSH', `cgmem_nice 300 ssh') -define(`REMOTE_HOST_TERM', `$1 -e SSH $2') +define(`TERM_SSH', `$1 -e SSH $2') -define(`REMOTE_HOST_TERM_TITLE', `$1 -title $3 -n $3 -e SSH $2') +define(`TERM_TITLE_SSH', `$1 -title "$3" -n "$3" -e SSH $2') -define(`REMOTE_HOST_KOI8', -REMOTE_HOST_TERM_TITLE(TERM_KOI8, $1, $2)) +define(`TERM_KOI8_SSH', +TERM_TITLE_SSH(TERM_KOI8, $1, $2)) -define(`REMOTE_SCREEN_KOI8', `-t $1 exec /usr/bin/screen -xRR -S default-koi8') -define(`REMOTE_SCREEN_UTF8', `-t $1 exec /usr/bin/screen -xRR -S default-utf8') +define(`SSH_SCREEN_KOI8', `-t $1 exec /usr/bin/screen -xRR -S default-koi8') +define(`SSH_SCREEN_UTF8', `-t $1 exec /usr/bin/screen -xRR -S default-utf8') -define(`REMOTE_HOST_KOI8_MENU', -"$2 (koi8)" REMOTE_HOST_KOI8($1, $2)) +define(`MENU_TERM_KOI8_SSH', +"$2 (koi8)" TERM_KOI8_SSH($1, $2)) -define(`REMOTE_HOST_KOI8_BOTLT', -REMOTE_HOST_TERM_TITLE(TERM_KOI8_BOTLT, $1, $2)) +define(`TERM_KOI8_BOTLT_SSH', +TERM_TITLE_SSH(TERM_KOI8_BOTLT, $1, $2)) -define(`REMOTE_HOST_KOI8_BOTRT', -REMOTE_HOST_TERM_TITLE(TERM_KOI8_BOTRT, $1, $2)) +define(`TERM_KOI8_BOTRT_SSH', +TERM_TITLE_SSH(TERM_KOI8_BOTRT, $1, $2)) -define(`REMOTE_HOST_KOI8_BOTLT_MENU', -"$2 (koi8,btlt)" REMOTE_HOST_KOI8_BOTLT($1, $2)) +define(`MENU_TERM_KOI8_BOTLT_SSH', +"$2 (koi8,btlt)" TERM_KOI8_BOTLT_SSH($1, $2)) -define(`REMOTE_HOST_KOI8_BOTRT_MENU', -"$2 (koi8,btrt)" REMOTE_HOST_KOI8_BOTRT($1, $2)) +define(`MENU_TERM_KOI8_BOTRT_SSH', +"$2 (koi8,btrt)" TERM_KOI8_BOTRT_SSH($1, $2)) -define(`REMOTE_HOST_UTF8', -REMOTE_HOST_TERM_TITLE(TERM_RU_UTF8, $1, $2)) +define(`TERM_UTF8_SSH', +TERM_TITLE_SSH(TERM_RU_UTF8, $1, $2)) -define(`REMOTE_HOST_UTF8_MENU', -"$2 (utf8)" REMOTE_HOST_UTF8($1, $2)) +define(`MENU_TERM_UTF8_SSH', +"$2 (utf8)" TERM_UTF8_SSH($1, $2)) -define(`REMOTE_HOST_UTF8_BOTLT', -REMOTE_HOST_TERM_TITLE(TERM_RU_UTF8_BOTLT, $1, $2)) +define(`TERM_UTF8_BOTLT_SSH', +TERM_TITLE_SSH(TERM_RU_UTF8_BOTLT, $1, $2)) -define(`REMOTE_HOST_UTF8_BOTRT', -REMOTE_HOST_TERM_TITLE(TERM_RU_UTF8_BOTRT, $1, $2)) +define(`TERM_UTF8_BOTRT_SSH', +TERM_TITLE_SSH(TERM_RU_UTF8_BOTRT, $1, $2)) -define(`REMOTE_HOST_UTF8_BOTLT_MENU', -"$2 (utf8,btlt)" REMOTE_HOST_UTF8_BOTLT($1, $2)) +define(`MENU_TERM_UTF8_BOTLT_SSH', +"$2 (utf8,btlt)" TERM_UTF8_BOTLT_SSH($1, $2)) -define(`REMOTE_HOST_UTF8_BOTRT_MENU', -"$2 (utf8,btrt)" REMOTE_HOST_UTF8_BOTRT($1, $2)) +define(`MENU_TERM_UTF8_BOTRT_SSH', +"$2 (utf8,btrt)" TERM_UTF8_BOTRT_SSH($1, $2)) -define(`REMOTE_HOST_KOI8_BIG', +define(`TERM_KOI8_BIG_SSH', TERM_KOI8 -geometry TERM_GEOM_BIG -title "$2" -n "$2" -e SSH "$1") -define(`REMOTE_HOST_KOI8_BIG_MENU', -"$2 (koi8)" REMOTE_HOST_KOI8_BIG($1, $2)) +define(`MENU_TERM_KOI8_BIG_SSH', +"$2 (koi8)" TERM_KOI8_BIG_SSH($1, $2)) divert @@ -152,7 +140,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/browser/chrome/icons/default:/usr/local/firefox/browser/icons +ImagePath /usr/share/icons/hicolor/32x32/apps/:/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 @@ -275,6 +263,7 @@ Style "*MPlayer*" Layer 6, PositionPlacement 250p 100p Style "*mpv" Layer 6, PositionPlacement 250p 100p Style "*clock" !Title, Sticky, WindowListSkip, Color Black/#40c040, NeverFocus, PositionPlacement 50-50w +1p, Layer 2 +Style "deadbeef" PositionPlacement -0 -0 Style "gxmessage" PositionPlacement 50-50w +20 Style "*lock" !Title, Sticky, WindowListSkip Style "Mosaic" NoPPosition @@ -487,9 +476,6 @@ AddToFunc StartStandardSession + I GotoDeskAndPage 0 0 0 + I TERM_KOI8 + I Wait TERM -+ I GotoDeskAndPage 0 0 1 -+ I TERM_RU_UTF8 -geometry 38x30+0-0 -+ I Wait URxvt + I Exec exec cgmem_nice 200 pulseaudio --start + I PaVuControl + I Exec exec "$HOME"/current/projects/audio-cdr-video/audio/pa-mic-off @@ -583,6 +569,8 @@ AddToFunc Raise-All I All Raise DestroyFunc PaVuControl AddToFunc PaVuControl I GotoDeskAndPage 0 1 1 ++ I Exec exec pulseaudio --kill ++ I Exec exec cgmem_nice 200 pulseaudio --start + I Exec exec cgmem_nice 200 pavucontrol + I Wait "Volume Control" @@ -593,36 +581,46 @@ changequote([`], [']) DestroyFunc AudioPlayer AddToFunc AudioPlayer I GotoDeskAndPage 0 1 1 -+ I Exec LC_CTYPE=ru_RU.KOI8-R exec cgmem_nice 200 audacious ++ I Exec LC_CTYPE=ru_RU.KOI8-R exec cgmem_nice 400 deadbeef DestroyFunc Term-Iskra AddToFunc Term-Iskra I GotoDeskAndPage 1 1 2 -+ I REMOTE_HOST_KOI8(REMOTE_SCREEN_KOI8(iskra-aviel.phdru.name), iskra) ++ I TERM_KOI8_SSH(SSH_SCREEN_KOI8(iskra-aviel.phdru.name), iskra scr) DestroyFunc Term-Iskra-Big AddToFunc Term-Iskra-Big I GotoDeskAndPage 1 1 2 -+ I REMOTE_HOST_KOI8_BIG(iskra-aviel.phdru.name, ISKRA) ++ I TERM_KOI8_BIG_SSH(iskra-aviel.phdru.name, ISKRA) DestroyFunc Term-Oper AddToFunc Term-Oper I GotoDeskAndPage 1 1 2 -+ I REMOTE_HOST_KOI8_BOTRT(REMOTE_SCREEN_KOI8(oper.med.ru), oper) ++ I TERM_KOI8_BOTRT_SSH(SSH_SCREEN_KOI8(oper.med.ru), oper scr) DestroyFunc Term-Oper-Big AddToFunc Term-Oper-Big I GotoDeskAndPage 1 1 2 -+ I REMOTE_HOST_KOI8_BIG(oper.med.ru, OPER) ++ I TERM_KOI8_BIG_SSH(oper.med.ru, OPER) DestroyFunc Term-Phdru AddToFunc Term-Phdru I GotoDeskAndPage 1 0 1 -+ I REMOTE_HOST_KOI8(REMOTE_SCREEN_KOI8(phdru.name), phdru.name) ++ I TERM_KOI8_SSH(SSH_SCREEN_KOI8(phdru.name), phdru.name scr) DestroyFunc Term-Phdru-Big AddToFunc Term-Phdru-Big I GotoDeskAndPage 1 0 1 -+ I REMOTE_HOST_KOI8_BIG(phdru.name, phdru.name) ++ I TERM_KOI8_BIG_SSH(phdru.name, phdru.name) + +DestroyFunc Term3Hosts +AddToFunc Term3Hosts I Term-Iskra ++ I Wait TERM ++ I Term-Oper ++ I Wait TERM ++ I GotoDeskAndPage 1 0 1 ++ I TERM_KOI8_SSH(SSH_SCREEN_KOI8(-D 1080 phdru.name), phdru.name scr) ++ I Wait TERM ++ I GotoDeskAndPage 1 1 2 DestroyFunc FireFox AddToFunc FireFox I Any ("*Mozilla Firefox") Break + I GotoDeskAndPage 1 0 0 -+ I Exec LC_CTYPE=ru_RU.KOI8-R exec cgmem_nice 4000 start-browser firefox ++ I Exec LC_CTYPE=ru_RU.KOI8-R exec cgmem_nice 4000 start-browser firefox -P phd + I Wait "*Mozilla Firefox" + I Exec LC_CTYPE=ru_RU.KOI8-R exec cgmem_nice 4000 firefox --new-window + I Wait "*Mozilla Firefox" @@ -636,6 +634,10 @@ DestroyFunc Pidgin AddToFunc Pidgin I GotoDeskAndPage 1 1 0 + I Exec exec cgmem_nice 300 pidgin +DestroyFunc Skype +AddToFunc Skype I GotoDeskAndPage 0 0 1 ++ I Exec BROWSER=firefox exec cgmem_nice 1000 skypeforlinux + 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 - @@ -719,17 +721,20 @@ AddToMenu TermColors "Term Colors" Title + "Term: white/black" TERM_KOI8 -fg white -cr white -bg black AddToMenu Systems "Systems" Title -+ REMOTE_HOST_KOI8_MENU(REMOTE_SCREEN_KOI8(iskra-aviel.phdru.name), iskra) -+ REMOTE_HOST_UTF8_BOTLT_MENU(iskra-aviel.phdru.name, iskra) -+ REMOTE_HOST_KOI8_BIG_MENU(iskra-aviel.phdru.name, ISKRA) ++ "Iskra+Oper+Phdru" Term3Hosts ++ "" Nop ++ MENU_TERM_KOI8_SSH(SSH_SCREEN_KOI8(iskra-aviel.phdru.name), iskra scr) ++ MENU_TERM_UTF8_BOTLT_SSH(iskra-aviel.phdru.name, iskra) ++ MENU_TERM_KOI8_BIG_SSH(iskra-aviel.phdru.name, ISKRA) + "" Nop -+ REMOTE_HOST_KOI8_BOTRT_MENU(REMOTE_SCREEN_KOI8(oper.med.ru), oper) -+ REMOTE_HOST_UTF8_BOTRT_MENU(oper.med.ru, oper) -+ REMOTE_HOST_KOI8_BIG_MENU(oper.med.ru, OPER) ++ MENU_TERM_KOI8_BOTRT_SSH(SSH_SCREEN_KOI8(oper.med.ru), oper scr) ++ MENU_TERM_UTF8_BOTRT_SSH(oper.med.ru, oper) ++ MENU_TERM_KOI8_BIG_SSH(oper.med.ru, OPER) + "" Nop -+ REMOTE_HOST_KOI8_MENU(REMOTE_SCREEN_KOI8(phdru.name), phdru) -+ REMOTE_HOST_UTF8_BOTLT_MENU(phdru.name, phdru) -+ REMOTE_HOST_KOI8_BIG_MENU(phdru.name, PHDRU) ++ MENU_TERM_KOI8_SSH(SSH_SCREEN_KOI8(phdru.name), phdru scr) ++ MENU_TERM_KOI8_SSH(SSH_SCREEN_KOI8(-D 1080 phdru.name), phdru scr SOCKS5) ++ MENU_TERM_UTF8_BOTLT_SSH(phdru.name, phdru) ++ MENU_TERM_KOI8_BIG_SSH(phdru.name, PHDRU) AddToMenu FvwmCommands "Fvwm Commands" Title + "Restart" Restart @@ -802,9 +807,9 @@ AddToMenu RootMenu "Root Menu" Title DestroyMenu OSMenu AddToMenu OSMenu "OS commands:" Title -+ "Suspend to ram" Exec exec s2r -+ "Suspend to disk" Exec exec s2d + "Suspend to both" Exec exec s2b ++ "Suspend to disk" Exec exec s2d ++ "Suspend to ram" Exec exec s2r # This menu will fire up some often used programs DestroyMenu Utilities @@ -816,6 +821,9 @@ AddToMenu Utilities "Choose one:" Title + "" Nop + "Refresh Screen" Refresh + "xrefresh" Exec exec xrefresh ++ "" Nop ++ "Skype" Skype ++ "pavucontrol" PaVuControl DestroyMenu Browsers AddToMenu Browsers "Choose one:" Title @@ -910,18 +918,19 @@ pushdef(`TERM_KOI8', `Exec "TERM" LC_CTYPE=ru_RU.KOI8-R exec TERM') pushdef(`TERM_RU_UTF8', `Exec "URxvt" LC_CTYPE=ru_RU.UTF-8 exec TERM -name URxvt') *FvwmButtons: (Title Term, Icon rterm2.xpm, Action TERM_KOI8) *FvwmButtons: (Title UTF-8, Icon rterm2.xpm, Action TERM_RU_UTF8) -*FvwmButtons: (Title phdru, Icon xterm-sgi.xpm, Action REMOTE_HOST_KOI8(REMOTE_SCREEN_KOI8(-D 1080 phdru.name), phdru.name)) -*FvwmButtons: (Title iskra, Icon xterm-sgi.xpm, Action REMOTE_HOST_KOI8(REMOTE_SCREEN_KOI8(iskra-aviel.phdru.name), iskra)) -*FvwmButtons: (Title oper, Icon xterm-linux.xpm, Action REMOTE_HOST_KOI8_BOTRT(REMOTE_SCREEN_KOI8(oper.med.ru), oper)) +*FvwmButtons: (Title "phdru scr", Icon xterm-sgi.xpm, Action TERM_KOI8_SSH(SSH_SCREEN_KOI8(phdru.name), phdru.name scr)) +*FvwmButtons: (Title "iskra scr", Icon xterm-sgi.xpm, Action TERM_KOI8_SSH(SSH_SCREEN_KOI8(iskra-aviel.phdru.name), iskra scr)) +*FvwmButtons: (Title "oper scr", Icon xterm-linux.xpm, Action TERM_KOI8_BOTRT_SSH(SSH_SCREEN_KOI8(oper.med.ru), oper scr)) popdef(`TERM_KOI8', `TERM_RU_UTF8') *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 cgmem_nice 200 pavucontrol) +#*FvwmButtons: (Title pavucontrol, Icon mini.sound.xpm, Action Exec "Volume Control" exec cgmem_nice 200 pavucontrol) #*FvwmButtons: (Title Id3Info, Icon bell.xpm, Action Id3Info) -*FvwmButtons: (Title AudioPlayer, Icon bell.xpm, Action Exec "Audacious" LC_CTYPE=ru_RU.KOI8-R exec cgmem_nice 200 audacious) +*FvwmButtons: (Title AudioPlayer, Icon bell.xpm, Action Exec "deadbeef" LC_CTYPE=ru_RU.KOI8-R exec cgmem_nice 400 deadbeef) #*FvwmButtons: (Title XLock, Icon Jxlock.xpm, Action Exec exec xscreensaver-command -lock) +*FvwmButtons: (Title Skype, Icon skypeforlinux.png, Action Skype) ############################################################################ # FvwmForm