X-Git-Url: https://git.phdru.name/?a=blobdiff_plain;f=.fvwm%2Fphd.m4;h=2d4e7abec8ec271f535354b2eeca53db744cd2b7;hb=70cfc640d5e73dc4f074290abe962048d1b61915;hp=80f0e43a2333a7552e6667fecfa6844a406b89f6;hpb=64f4a9546340d990665e24896b410d460981f11a;p=dotfiles.git

diff --git a/.fvwm/phd.m4 b/.fvwm/phd.m4
index 80f0e43..2d4e7ab 100644
--- a/.fvwm/phd.m4
+++ b/.fvwm/phd.m4
@@ -89,6 +89,7 @@ define(`TERM_GEOM',
 )')'dnl
 )
 
+define(`TERM_GEOM_BOTLT', `TERM_GEOM+0-0')'dnl
 define(`TERM_GEOM_BOTRT', `TERM_GEOM-0-0')'dnl
 
 define(`TERM_GEOM_BIG',
@@ -101,6 +102,8 @@ define(`TERM_GEOM_BIG',
 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')
 
@@ -113,10 +116,18 @@ define(`REMOTE_HOST_KOI8_MENU',
 "$2 (koi8)" REMOTE_HOST_KOI8($1, $2)dnl
 )
 
+define(`REMOTE_HOST_KOI8_BOTLT',
+TERM_KOI8_BOTLT -title "$2" -n "$2" -e ssh -4 "$1"dnl
+)
+
 define(`REMOTE_HOST_KOI8_BOTRT',
 TERM_KOI8_BOTRT -title "$2" -n "$2" -e ssh -4 "$1"dnl
 )
 
+define(`REMOTE_HOST_KOI8_BOTLT_MENU',
+"$2 (koi8,btlt)" REMOTE_HOST_KOI8_BOTLT($1, $2)dnl
+)
+
 define(`REMOTE_HOST_KOI8_BOTRT_MENU',
 "$2 (koi8,btrt)" REMOTE_HOST_KOI8_BOTRT($1, $2)dnl
 )
@@ -129,10 +140,18 @@ define(`REMOTE_HOST_UTF8_MENU',
 "$2 (utf8)" REMOTE_HOST_UTF8($1, $2)dnl
 )
 
+define(`REMOTE_HOST_UTF8_BOTLT',
+TERM_UTF8_BOTLT -e ssh -4 "$1"dnl
+)
+
 define(`REMOTE_HOST_UTF8_BOTRT',
 TERM_UTF8_BOTRT -e ssh -4 "$1"dnl
 )
 
+define(`REMOTE_HOST_UTF8_BOTLT_MENU',
+"$2 (utf8,btlt)" REMOTE_HOST_UTF8_BOTLT($1, $2)dnl
+)
+
 define(`REMOTE_HOST_UTF8_BOTRT_MENU',
 "$2 (utf8,btrt)" REMOTE_HOST_UTF8_BOTRT($1, $2)dnl
 )
@@ -477,8 +496,8 @@ AddToFunc "StartStandardSession"
 +              I TERM_KOI8
 +              I Wait TERM
 +              I GotoDeskAndPage 0 0 1
-+              I TERM_KOI8 -geometry 38x30+0-0
-+              I Wait TERM
++              I TERM_UTF8 -geometry 38x30+0-0
++              I Wait URxvt
 +              I GotoDeskAndPage 0 1 0
 +              I TERM_KOI8 -e su -
 +              I Wait TERM