X-Git-Url: https://git.phdru.name/?a=blobdiff_plain;f=.fvwm%2Fmain.m4;h=acdba2c978cb1e9d7a0a6fa463e772899e93bcbc;hb=f47c26b420ce5cdc352f921889dfacd67a7fad9a;hp=62ee64463427b407348fb4e97beabb19847ecbbc;hpb=4292cde909a55a4927b1e8bdc9796262f32d919b;p=dotfiles.git diff --git a/.fvwm/main.m4 b/.fvwm/main.m4 index 62ee644..acdba2c 100644 --- a/.fvwm/main.m4 +++ b/.fvwm/main.m4 @@ -4,26 +4,13 @@ dnl The file is in m4 format, use FvwmM4 module to read it dnl like this: ModuleSynchronous FvwmM4 -lock main.m4 - +dnl dnl This is to prevent FvwmM4 to shadow $HOME -undefine(`HOME') - +undefine(`HOME')dnl +dnl dnl Echo dimension -`#' width = WIDTH - +`#' width = WIDTH()dnl 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') @@ -92,58 +79,110 @@ define(`TERM_KOI8_BOTLT', `TERM_KOI8 -geometry TERM_GEOM_BOTLT') define(`TERM_RU_UTF8_BOTLT', `TERM_RU_UTF8 -geometry TERM_GEOM_BOTLT') define(`TERM_KOI8_BOTRT', `TERM_KOI8 -geometry TERM_GEOM_BOTRT') define(`TERM_RU_UTF8_BOTRT', `TERM_RU_UTF8 -geometry TERM_GEOM_BOTRT') +define(`TERM_KOI8_BIG', `TERM_KOI8 -geometry TERM_GEOM_BIG') +define(`TERM_UTF8_BIG', `TERM_RU_UTF8 -geometry TERM_GEOM_BIG') define(`SSH', `cgmem_nice 300 ssh') -define(`REMOTE_HOST_TERM', `$1 -e SSH $2') +define(`TERM_SSH', `$1 -e SSH $2') + +define(`TERM_TITLE_SSH', `$1 -title "$3" -n "$3" -e SSH $2') + +define(`TERM_KOI8_SSH', +`TERM_TITLE_SSH(`TERM_KOI8', $1, $2)') + +define(`SSH_SCREEN_KOI8', +`SSH -t $1 TZ="$(cat /etc/timezone)" exec /usr/bin/screen -xRR -S default-koi8') +define(`SSH_SCREEN_UTF8', +`SSH -t $1 TZ="$(cat /etc/timezone)" exec /usr/bin/screen -xRR -S default-utf8') + +define(`TERM_TITLE_SSH_SCREEN_KOI8', +`$1 -title "$3 scr" -n "$3 scr" -e SSH_SCREEN_KOI8($2)') + +define(`TERM_TITLE_SSH_SCREEN_UTF8', +`$1 -title "$3 scr" -n "$3 scr" -e SSH_SCREEN_UTF8($2)') + +define(`MENU_TERM_KOI8_SSH', +`"$2 (koi8)" TERM_KOI8_SSH($1, $2)') + +define(`TERM_KOI8_BOTLT_SSH', +`TERM_TITLE_SSH(`TERM_KOI8_BOTLT', $1, $2)') + +define(`TERM_KOI8_BOTRT_SSH', +`TERM_TITLE_SSH(`TERM_KOI8_BOTRT', $1, $2)') + +define(`MENU_TERM_KOI8_BOTLT_SSH', +`"$2 (btlt,koi8)" TERM_KOI8_BOTLT_SSH($1, $2)') + +define(`MENU_TERM_KOI8_BOTRT_SSH', +`"$2 (btrt,koi8)" TERM_KOI8_BOTRT_SSH($1, $2)') + +define(`TERM_KOI8_SSH_SCREEN', +`TERM_TITLE_SSH_SCREEN_KOI8(`TERM_KOI8', $1, $2)') -define(`REMOTE_HOST_TERM_TITLE', `$1 -title $3 -n $3 -e SSH $2') +define(`MENU_TERM_KOI8_SSH_SCREEN', +`"$2 (koi8,scr)" TERM_TITLE_SSH_SCREEN_KOI8(`TERM_KOI8', $1, $2)') -define(`REMOTE_HOST_KOI8', -REMOTE_HOST_TERM_TITLE(TERM_KOI8, $1, $2)) +define(`TERM_KOI8_BOTLT_SSH_SCREEN', +`TERM_TITLE_SSH_SCREEN_KOI8(`TERM_KOI8_BOTLT', $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(`TERM_KOI8_BOTRT_SSH_SCREEN', +`TERM_TITLE_SSH_SCREEN_KOI8(`TERM_KOI8_BOTRT', $1, $2)') -define(`REMOTE_HOST_KOI8_MENU', -"$2 (koi8)" REMOTE_HOST_KOI8($1, $2)) +define(`MENU_TERM_KOI8_BOTLT_SSH_SCREEN', +`"$2 (btlt,koi8,scr)" TERM_KOI8_BOTLT_SSH_SCREEN($1, $2)') -define(`REMOTE_HOST_KOI8_BOTLT', -REMOTE_HOST_TERM_TITLE(TERM_KOI8_BOTLT, $1, $2)) +define(`MENU_TERM_KOI8_BOTRT_SSH_SCREEN', +`"$2 (btrt,koi8,scr)" TERM_KOI8_BOTRT_SSH_SCREEN($1, $2)') -define(`REMOTE_HOST_KOI8_BOTRT', -REMOTE_HOST_TERM_TITLE(TERM_KOI8_BOTRT, $1, $2)) +define(`TERM_UTF8_SSH', +`TERM_TITLE_SSH(`TERM_RU_UTF8', $1, $2)') -define(`REMOTE_HOST_KOI8_BOTLT_MENU', -"$2 (koi8,btlt)" REMOTE_HOST_KOI8_BOTLT($1, $2)) +define(`MENU_TERM_UTF8_SSH', +`"$2 (utf8)" TERM_UTF8_SSH($1, $2)') -define(`REMOTE_HOST_KOI8_BOTRT_MENU', -"$2 (koi8,btrt)" REMOTE_HOST_KOI8_BOTRT($1, $2)) +define(`TERM_UTF8_BOTLT_SSH', +`TERM_TITLE_SSH(`TERM_RU_UTF8_BOTLT', $1, $2)') -define(`REMOTE_HOST_UTF8', -REMOTE_HOST_TERM_TITLE(TERM_RU_UTF8, $1, $2)) +define(`TERM_UTF8_BOTRT_SSH', +`TERM_TITLE_SSH(`TERM_RU_UTF8_BOTRT', $1, $2)') -define(`REMOTE_HOST_UTF8_MENU', -"$2 (utf8)" REMOTE_HOST_UTF8($1, $2)) +define(`MENU_TERM_UTF8_BOTLT_SSH', +`"$2 (btlt,utf8)" TERM_UTF8_BOTLT_SSH($1, $2)') -define(`REMOTE_HOST_UTF8_BOTLT', -REMOTE_HOST_TERM_TITLE(TERM_RU_UTF8_BOTLT, $1, $2)) +define(`MENU_TERM_UTF8_BOTRT_SSH', +`"$2 (btrt,utf8)" TERM_UTF8_BOTRT_SSH($1, $2)') -define(`REMOTE_HOST_UTF8_BOTRT', -REMOTE_HOST_TERM_TITLE(TERM_RU_UTF8_BOTRT, $1, $2)) +define(`TERM_UTF8_SSH_SCREEN', +`TERM_TITLE_SSH_SCREEN_UTF8(`TERM_RU_UTF8', $1, $2)') -define(`REMOTE_HOST_UTF8_BOTLT_MENU', -"$2 (utf8,btlt)" REMOTE_HOST_UTF8_BOTLT($1, $2)) +define(`MENU_TERM_UTF8_SSH_SCREEN', +`"$2 (utf8,scr)" TERM_UTF8_SSH_SCREEN($1, $2)') -define(`REMOTE_HOST_UTF8_BOTRT_MENU', -"$2 (utf8,btrt)" REMOTE_HOST_UTF8_BOTRT($1, $2)) +define(`TERM_UTF8_BOTLT_SSH_SCREEN', +`TERM_TITLE_SSH_SCREEN_UTF8(`TERM_RU_UTF8_BOTLT', $1, $2)') -define(`REMOTE_HOST_KOI8_BIG', -TERM_KOI8 -geometry TERM_GEOM_BIG -title "$2" -n "$2" -e SSH "$1") +define(`TERM_UTF8_BOTRT_SSH_SCREEN', +`TERM_TITLE_SSH_SCREEN_UTF8(`TERM_RU_UTF8_BOTRT', $1, $2)') -define(`REMOTE_HOST_KOI8_BIG_MENU', -"$2 (koi8)" REMOTE_HOST_KOI8_BIG($1, $2)) +define(`MENU_TERM_UTF8_BOTLT_SSH_SCREEN', +`"$2 (btlt,utf8,scr)" TERM_UTF8_BOTLT_SSH_SCREEN($1, $2)') + +define(`MENU_TERM_UTF8_BOTRT_SSH_SCREEN', +`"$2 (btrt,utf8,scr)" TERM_UTF8_BOTRT_SSH_SCREEN($1, $2)') + +define(`TERM_KOI8_BIG_SSH', +`TERM_KOI8_BIG -title "$2" -n "$2" -e SSH "$1"') + +define(`MENU_TERM_KOI8_BIG_SSH', +`"$2 (koi8)" TERM_KOI8_BIG_SSH($1, $2)') + +define(`TERM_KOI8_BIG_SSH_SCREEN', +`TERM_KOI8_BIG -title "$2" -n "$2" -e SSH_SCREEN_KOI8 "$1"') + +define(`MENU_TERM_KOI8_BIG_SSH_SCREEN', +`"$2 (koi8,scr)" TERM_KOI8_BIG_SSH_SCREEN($1, $2)') divert @@ -494,7 +533,7 @@ AddToFunc StartStandardSession + I XsetbgFilename + I Wait gxmessage + I GotoDeskAndPage 2 0 1 -+ I TERM_KOI8 -geometry TERM_GEOM_BIG ++ I TERM_KOI8_BIG + I Wait TERM + I FireFox + I GotoDeskAndPage 0 1 1 @@ -586,46 +625,17 @@ AddToFunc PaVuControl I GotoDeskAndPage 0 1 1 + I Exec exec cgmem_nice 200 pavucontrol + I Wait "Volume Control" -changequote([,]) +changequote([,])dnl DestroyFunc Id3Info AddToFunc Id3Info I Exec "$HOME"/lib/audio/mp3/id3info.py "`audtool --current-song-filename`" | text-wrap.py | gxmessage -buttons Ok -default Ok -fn 'MESSAGE_FONT' -file - -changequote([`], [']) - -DestroyFunc AudioPlayer -AddToFunc AudioPlayer I GotoDeskAndPage 0 1 1 -+ I Exec LC_CTYPE=ru_RU.KOI8-R exec cgmem_nice 300 deadbeef +changequote([`], ['])dnl -DestroyFunc Term-Iskra -AddToFunc Term-Iskra I GotoDeskAndPage 1 1 2 -+ I REMOTE_HOST_KOI8(REMOTE_SCREEN_KOI8(iskra-aviel.phdru.name), iskra) - -DestroyFunc Term-Iskra-Big -AddToFunc Term-Iskra-Big I GotoDeskAndPage 1 1 2 -+ I REMOTE_HOST_KOI8_BIG(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) - -DestroyFunc Term-Oper-Big -AddToFunc Term-Oper-Big I GotoDeskAndPage 1 1 2 -+ I REMOTE_HOST_KOI8_BIG(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) - -DestroyFunc Term-Phdru-Big -AddToFunc Term-Phdru-Big I GotoDeskAndPage 1 0 1 -+ I REMOTE_HOST_KOI8_BIG(phdru.name, phdru.name) - -DestroyFunc Term3Hosts -AddToFunc Term3Hosts I Term-Iskra -+ I Wait TERM -+ I Term-Oper +DestroyFunc Term2HostsHome +AddToFunc Term2HostsHome I GotoDeskAndPage 1 1 2 ++ I TERM_KOI8_SSH_SCREEN(iskra-aviel.phdru.name, iskra) + I Wait TERM + I GotoDeskAndPage 1 0 1 -+ I REMOTE_HOST_KOI8(REMOTE_SCREEN_KOI8(-D 1080 phdru.name), phdru.name) ++ I TERM_KOI8_SSH_SCREEN(-D 1080 phdru.name, phdru.name) + I Wait TERM + I GotoDeskAndPage 1 1 2 @@ -648,7 +658,7 @@ AddToFunc Pidgin I GotoDeskAndPage 1 1 0 DestroyFunc Skype AddToFunc Skype I GotoDeskAndPage 0 0 1 -+ I Exec BROWSER=firefox exec cgmem_nice 1000 skypeforlinux ++ I Exec BROWSER=firefox exec cgmem_nice 2000 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 - @@ -697,12 +707,12 @@ AddToMenu Terminals "Terminals" Title + "Grey term (koi8)" TERM_KOI8 + "Grey term (utf8)" TERM_RU_UTF8 + "Grey term (heb-utf8)" TERM_HEB_UTF8 -+ "Grey term (koi8,btlt)" TERM_KOI8_BOTLT -+ "Grey term (koi8,btrt)" TERM_KOI8_BOTRT -+ "Grey term (utf8,btlt)" TERM_RU_UTF8_BOTLT -+ "Grey term (utf8,btrt)" TERM_RU_UTF8_BOTRT -+ "Big grey term (koi8)" TERM_KOI8 -geometry TERM_GEOM_BIG -+ "Big grey term (utf8)" TERM_RU_UTF8 -geometry TERM_GEOM_BIG ++ "Grey term (btlt,koi8)" TERM_KOI8_BOTLT ++ "Grey term (btrt,koi8)" TERM_KOI8_BOTRT ++ "Grey term (btlt,utf8)" TERM_RU_UTF8_BOTLT ++ "Grey term (btrt,utf8)" TERM_RU_UTF8_BOTRT ++ "Big grey term (koi8)" TERM_KOI8_BIG ++ "Big grey term (utf8)" TERM_UTF8_BIG + "" Nop + "White/black term (koi8)" TERM_KOI8 -fg white -cr white -bg black + "White/black term (utf8)" TERM_RU_UTF8 -fg white -bg black @@ -733,20 +743,21 @@ AddToMenu TermColors "Term Colors" Title + "Term: white/black" TERM_KOI8 -fg white -cr white -bg black AddToMenu Systems "Systems" Title -+ "Iskra+Oper+Phdru" Term3Hosts -+ "" Nop -+ 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+Phdru" Term2HostsHome + "" 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) +pushdef(`TERM_KOI8', `Exec LC_CTYPE=ru_RU.KOI8-R exec TERM -xrm "*Page: 1 1 1"')dnl +pushdef(`TERM_RU_UTF8', `Exec LC_CTYPE=ru_RU.UTF-8 exec TERM -name URxvt -xrm "*Page: 1 1 1"')dnl ++ MENU_TERM_KOI8_SSH_SCREEN(iskra-aviel.phdru.name, iskra) ++ MENU_TERM_UTF8_BOTLT_SSH(iskra-aviel.phdru.name, iskra) ++ MENU_TERM_KOI8_BIG_SSH(iskra-aviel.phdru.name, ISKRA) + "" Nop -+ REMOTE_HOST_KOI8_MENU(REMOTE_SCREEN_KOI8(phdru.name), phdru) -+ REMOTE_HOST_KOI8_MENU(REMOTE_SCREEN_KOI8(-D 1080 phdru.name), phdru SOCKS5) -+ REMOTE_HOST_UTF8_BOTLT_MENU(phdru.name, phdru) -+ REMOTE_HOST_KOI8_BIG_MENU(phdru.name, PHDRU) +pushdef(`TERM_KOI8', `Exec LC_CTYPE=ru_RU.KOI8-R exec TERM -xrm "*Page: 1 0 1"')dnl +pushdef(`TERM_RU_UTF8', `Exec LC_CTYPE=ru_RU.UTF-8 exec TERM -name URxvt -xrm "*Page: 1 0 1"')dnl ++ MENU_TERM_KOI8_SSH_SCREEN(phdru.name, phdru) ++ MENU_TERM_KOI8_SSH_SCREEN(-D 1080 phdru.name, phdru SOCKS5) ++ MENU_TERM_UTF8_BOTLT_SSH(phdru.name, phdru) ++ MENU_TERM_KOI8_BIG_SSH(phdru.name, PHDRU) +popdef(`TERM_KOI8', `TERM_RU_UTF8')dnl AddToMenu FvwmCommands "Fvwm Commands" Title + "Restart" Restart @@ -858,6 +869,7 @@ AddToMenu Browsers "Choose one:" Title #+ "Blank" Exec exec xlock -mode blank AddToMenu XScreenSaverMenu "Choose mode:" Title ++ "Suspend Screen Now" Exec exec xscreensaver-command -suspend + "Blank Screen Now" Exec exec xscreensaver-command -activate + "Lock Screen Now" Exec exec xscreensaver-command -lock + "Screen Saver Demo" Exec exec xscreensaver-command -demo @@ -926,23 +938,26 @@ 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_RU_UTF8', `Exec "URxvt" LC_CTYPE=ru_RU.UTF-8 exec TERM -name URxvt') +pushdef(`TERM_KOI8', `Exec "TERM" LC_CTYPE=ru_RU.KOI8-R exec TERM')dnl +pushdef(`TERM_RU_UTF8', `Exec "URxvt" LC_CTYPE=ru_RU.UTF-8 exec TERM -name URxvt')dnl *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(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)) -popdef(`TERM_KOI8', `TERM_RU_UTF8') +popdef(`TERM_KOI8', `TERM_RU_UTF8')dnl +pushdef(`TERM_KOI8', `Exec "TERM" LC_CTYPE=ru_RU.KOI8-R exec TERM -xrm "*Page: 1 0 1"')dnl +*FvwmButtons: (Title "phdru (k8,s)", Icon xterm-sgi.xpm, Action TERM_KOI8_SSH_SCREEN(phdru.name, phdru.name)) +popdef(`TERM_KOI8')dnl +pushdef(`TERM_KOI8', `Exec "TERM" LC_CTYPE=ru_RU.KOI8-R exec TERM -xrm "*Page: 1 1 1"')dnl +*FvwmButtons: (Title "iskra (k8,s)", Icon xterm-sgi.xpm, Action TERM_KOI8_SSH_SCREEN(iskra-aviel.phdru.name, iskra)) +popdef(`TERM_KOI8')dnl *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 Id3Info, Icon bell.xpm, Action Id3Info) -*FvwmButtons: (Title AudioPlayer, Icon bell.xpm, Action Exec "deadbeef" LC_CTYPE=ru_RU.KOI8-R exec cgmem_nice 300 deadbeef) +#*FvwmButtons: (Title Skype, Icon skypeforlinux.png, Action Exec "Skype" FvwmCommand "GotoDeskAndPage 0 0 1" && BROWSER=firefox exec cgmem_nice 2000 skypeforlinux) +*FvwmButtons: (Title AudioPlayer, Icon bell.xpm, Action Exec "deadbeef" LC_CTYPE=ru_RU.KOI8-R FvwmCommand "GotoDeskAndPage 0 1 1" && 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 @@ -970,7 +985,7 @@ popdef(`TERM_KOI8', `TERM_RU_UTF8') #*Rlogin: Input UserName 10 "" #*Rlogin: Line expand #*Rlogin: Button quit "Login" ^M -#*Rlogin: Command TERM_KOI8 -T term@$(HostName) -e rlogin $(HostName) $(Custom?-l $(UserName)) +`#'*Rlogin: Command TERM_KOI8 -T term@$(HostName) -e rlogin $(HostName) $(Custom?-l $(UserName)) #*Rlogin: Button restart "Clear" #*Rlogin: Command Beep #*Rlogin: Button quit "Cancel"