CNN Rehab and revisting twm

Posted:

Some good friends of mine stongly urged me to stop watching CNN for a spell. Apparently, I’m becoming hysterical. How they isolated the cause of this hysteria to CNN is beyond my feeble powers to discern. Nevertheless, I going to avoid CNN and the Boston Globe for 5 days or so.

The effect of this isolation is that my journal entries will devolve into increasing esoteric topics. Hence, the following.

In this age of increasing complex X desktop environments, I’ve taking a courageous step back in time by tweaking my .xinitrc and .twmrc files. That’s right, my current window manager of choice is the tab window manager. Take a second to try out these settings. (note: hard coded for 1028x768 screen resolution).

.xinitrc

xsetroot -solid gray85 &
xterm -fg blue -bg white -g 80x25+0+0 &
xterm -fg red -bg white -g 80x25+0-0 &
xterm -fg orange -bg white -g 80x25-0+0 &
xclock -digital -update 5 -bg white -fg gray45 -g -0+420 &
exec twm

.twmrc

ShowIconManager
IconManagerGeometry “191x200-0+468” 2
IconifyByUnmapping
RandomPlacement
NoGrabServer
RestartPreviousState
DecorateTransients
TitleFont “-misc-fixed-medium-r-normal—-90------
ResizeFont “-misc-fixed-medium-r-normal—
-90------
MenuFont “-misc-fixed-medium-r-normal—-90------
IconFont “-misc-fixed-medium-r-normal—
-90------
IconManagerFont “-misc-fixed-medium-r-normal—-90---


Color
{
BorderColor “black”
DefaultBackground “white”
DefaultForeground “gray60”
TitleBackground “white”
TitleForeground “gray60”
MenuBackground “white”
MenuForeground “gray60”
MenuTitleBackground “white”
MenuTitleForeground “gray60”
IconBackground “white”
IconForeground “gray60”
IconBorderColor “black”
IconManagerBackground “white”
IconManagerForeground “gray60”
}

MoveDelta 3
Function “move-or-lower” { f.move f.deltastop f.lower }
Function “move-or-raise” { f.move f.deltastop f.raise }
Function “move-or-iconify” { f.move f.deltastop f.iconify }


Button1 = : root : f.menu “defops”

Button1 = m : window|icon : f.function “move-or-lower”
Button2 = m : window|icon : f.iconify
Button3 = m : window|icon : f.function “move-or-raise”

Button1 = : title : f.function “move-or-raise”
Button2 = : title : f.raiselower

Button1 = : icon : f.function “move-or-iconify”
Button2 = : icon : f.iconify

Button1 = : iconmgr : f.iconify
Button2 = : iconmgr : f.iconify


menu “defops”
{
“Twm” f.title
“Iconify” f.iconify
“Resize” f.resize
“Move” f.move
“” f.nop
“Focus” f.focus
“Unfocus” f.unfocus
“Show Iconmgr” f.showiconmgr
“Hide Iconmgr” f.hideiconmgr
“” f.nop
“CDPlayer” f.exec “exec xplaycd &”
“Gdict” f.exec “exec gdict -a &”
“Netscape” f.exec “exec netscape &”
“Xterm” f.exec “exec xterm &”
“” f.nop
“Kill” f.destroy
“Delete” f.delete
“” f.nop
“Restart” f.restart
“Exit” f.quit
}

IconManagerDontShow
{
“xclock”
}

[Original use.perl.org post and comments.]