Module Name:    xsrc
Committed By:   nia
Date:           Tue Sep 22 21:08:56 UTC 2020

Modified Files:
        xsrc/external/mit/ctwm/dist: system.ctwmrc

Log Message:
replace default ctwmrc by mine from tech-x11


To generate a diff of this commit:
cvs rdiff -u -r1.1 -r1.2 xsrc/external/mit/ctwm/dist/system.ctwmrc

Please note that diffs are not public domain; they are subject to the
copyright notices on the relevant files.

Modified files:

Index: xsrc/external/mit/ctwm/dist/system.ctwmrc
diff -u xsrc/external/mit/ctwm/dist/system.ctwmrc:1.1 xsrc/external/mit/ctwm/dist/system.ctwmrc:1.2
--- xsrc/external/mit/ctwm/dist/system.ctwmrc:1.1	Thu Sep  3 22:16:33 2015
+++ xsrc/external/mit/ctwm/dist/system.ctwmrc	Tue Sep 22 21:08:56 2020
@@ -1,181 +1,375 @@
 #
-# $XConsortium: system.twmrc,v 1.8 91/04/23 21:10:58 gildea Exp $
+# $NetBSD: system.ctwmrc,v 1.2 2020/09/22 21:08:56 nia Exp $
 #
-# Default twm configuration file; needs to be kept small to conserve string
-# space in systems whose compilers don't handle medium-sized strings.
+# ctwmrc by nia
 #
-# Sites should tailor this file, providing any extra title buttons, menus, etc.
-# that may be appropriate for their environment.  For example, if most of the
-# users were accustomed to uwm, the defaults could be set up not to decorate
-# any windows and to use meta-keys.
+# An attempt to strike a usability balance that makes keys and buttons
+# do the thing users of various operating systems expect them to do.
+#
+# Most things should be possible to accomplish with only the keyboard.
+#
+# Also, mostly inoffensive colours (avoiding potentially inaccessible
+# combinations like red-green).
 #
 
-NoGrabServer
+# don't use the default buttons or key bindings, we define our own
+NoDefaults
+
+ShowWorkSpaceManager
+ShowIconManager
+
+# 3D icon managers do not seemingly honor IconManagerHighlight,
+# which makes them slightly less useful
+#UseThreeDIconManagers
+#UseThreeDWMap
+UseThreeDBorders
+#UseThreeDMenus
+UseThreeDTitles
+
+ThreeDBorderWidth         3
+
+# TODO: we can use syscmd() in combination with xdpyinfo to detect
+# HiDPI screens and set appropiate fonts.
+#
+# need some good scaled bitmap fonts imported - terminus or spleen
+# would be good candidates
+MenuFont         "-misc-fixed-medium-r-*-*-14-*-*-*-*-*-*-*"
+TitleFont        "-misc-fixed-bold-r-*-*-18-*-*-*-*-*-*-*"
+IconManagerFont  "-misc-fixed-medium-r-*-*-14-*-*-*-*-*-*-*"
+IconFont         "-misc-fixed-bold-r-*-*-18-*-*-*-*-*-*-*"
+ResizeFont       "-misc-fixed-medium-r-*-*-18-*-*-*-*-*-*-*"
+WorkSpaceFont    "-misc-fixed-medium-r-*-*-14-*-*-*-*-*-*-*"
+
 RestartPreviousState
+
 DecorateTransients
-TitleFont	"-adobe-helvetica-bold-r-normal--*-120-*-*-*-*-*-*"
-ResizeFont	"-adobe-helvetica-bold-r-normal--*-120-*-*-*-*-*-*"
-MenuFont	"-adobe-helvetica-bold-r-normal--*-120-*-*-*-*-*-*"
-IconFont	"-adobe-helvetica-bold-r-normal--*-100-*-*-*-*-*-*"
-IconManagerFont	"-adobe-helvetica-bold-r-normal--*-100-*-*-*"
-ShowWorkSpaceManager			# start with workspace manager up
-UseThreeDMenus
-UseThreeDTitles
-UseThreeDIconManagers
-UseThreeDBorders
-UseThreeDWMap
-SunkFocusWindowTitle
 
-WorkSpaceManagerGeometry        "360x60+60-0" 4
-WorkSpaces {
-    "One"   {"#686B9F" "white" "DeepSkyBlue3" "white" "xpm:background8.xpm"}
-    "Two"   {"#619AAE" "white" "firebrick" "white" "plaid"}
-    "Three" {"#727786" "white" "brown"}
-    "Four"  {"#8C5b7A" "white" "MidnightBlue"}
-
-    "Five"  {"#727786" "white" "firebrick"}
-    "Six"   {"#619AAE" "white" "DeepSkyBlue3"}
-    "Seven" {"#8C5b7A" "white" "chartreuse4"}
-    "Eight" {"#686B9F" "white" "MidnightBlue"}
+# hide window contents while altering windows for performance
+NoOpaqueMove
+NoOpaqueResize
+
+SloppyFocus
+
+AutoOccupy
+AutoRelativeResize
+
+CenterFeedbackWindow
+
+NoGrabServer
+
+RaiseOnClick
+
+DontMoveOff
+MoveOffResistance	  150
+
+ConstrainedMoveTime       0
+
+IgnoreLockModifier
+
+# Not actually that random.
+# Means that windows do not have to be placed by hand with a mouse,
+# which helps if you are using a keyboard only.
+RandomPlacement          "on"
+
+MoveDelta                 3
+ClearShadowContrast       50
+DarkShadowContrast        50
+MovePackResistance        100
+
+RaiseWhenAutoUnSqueeze
+ShortAllWindowsMenus
+
+#BeNiceToColorMap
+
+NoStackMode
+
+StayUpMenus
+WarpToDefaultMenuEntry
+MenuShadowDepth      1
+
+NoTitleFocus
+
+# warp through all windows in the current workspace
+WindowRing
+WarpRingOnScreen
+
+TitleButtonShadowDepth    1
+TitleShadowDepth          1
+TitleButtonBorderWidth    0
+TitlePadding              0
+TitleJustification        "left"
+ButtonIndent              0
+FramePadding		  0
+
+LeftTitleButton           ":xpm:dot"      = f.menu "titleops"
+RightTitleButton          ":xpm:resize"   = f.resize
+RightTitleButton          ":xpm:cross"    = f.delete
+
+BorderWidth               4
+BorderShadowDepth         2
+BorderResizeCursors
+
+MaxIconTitleWidth         120
+NoIconManagerFocus
+IconManagerShadowDepth    1
+IconManagerGeometry       "200x-1-1+0" 1
+IconifyByUnmapping
+
+ReallyMoveInWorkspaceManager
+MapWindowCurrentWorkSpace {  "black", "firebrick" }
+DontToggleWorkSpaceManagerState
+DontWarpCursorInWMap
+NoShowOccupyAll	
+ReverseCurrentWorkspace	
+StartInMapState
+WMgrHorizButtonIndent     0
+WMgrVertButtonIndent      0
+WorkSpaceManagerGeometry  "70x270-4-4" 1 5
+
+WorkSpaces 
+{
+    "1"    { "lavender" "black" "darkslateblue" "white" }
+    "2"    { "lavender" "black" "darkslateblue" "white" }
+    "3"    { "lavender" "black" "darkslateblue" "white" }
+    "4"    { "lavender" "black" "darkslateblue" "white" }
+    "5"    { "lavender" "black" "darkslateblue" "white" }
 }
 
 Color
 {
-    BorderColor           "Red"
-    DefaultBackground     "blue"
-    DefaultForeground     "gray85"
-    BorderTileBackground  "DeepSkyBlue1" {
-	"xterm"		"DeepSkyBlue3"
-    }
-    BorderTileForeground  "Black" {
-	"xterm" "DeepSkyBlue3"
-    }
-    TitleBackground       "DeepSkyBlue1" {
-	"xterm" "DeepSkyBlue3"
-    }
-    TitleForeground       "Black" {
-	"xterm" "White"
-    }
-    MenuBackground        "#686B9F"
-    MenuForeground        "white"
-    MenuTitleBackground   "gray70"
-    MenuTitleForeground   "White"
-    IconBackground        "LightSlateBlue"
-    IconForeground        "White"
-    IconBorderColor       "gray85"
-    IconManagerBackground "DeepSkyBlue1" {"Axe" "DeepSkyBlue3" "xload" "DeepSkyBlue2"}
-    IconManagerForeground "Black"
-    MapWindowBackground   "DeepSkyBlue1" {
-	"root*" "Red"
-	"xterm" "DeepSkyBlue3"
-	"Axe"	"Yellow"
-    }
-    MapWindowForeground   "Black" {
-	"xterm" "White"
-    }
-}
-
-IconManagerGeometry		"202x300-0+0" 1
-IconManagerDontShow {
-    "WorkSpaceManager"
-}
-
-NoTitle {                  # little programs that look like icons
-    "TWM Icon Manager"
-    "WorkSpaceManager"
-}
-#
-# Define some useful functions for motion-based actions.
-#
-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 }
-
-#
-# Set some useful bindings.  Sort of uwm-ish, sort of simple-button-ish
-#
-Button1 =	: root		: f.menu "defops"
-Button2 =	: root		: f.menu "windowops"
-
-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 = m     : title		: f.movetitlebar
-
-Button1 =	: icon		: f.function "move-or-iconify"
-Button2 =	: icon		: f.iconify
-
-Button1 =	: iconmgr	: f.iconify
-Button2 =	: iconmgr	: f.iconify
-
-Button1 =	: frame		: f.resize
-Button1 = m	: frame		: f.move
-Button2 =	: frame		: f.raiselower
-#
-# And a menus with the usual things
-#
-menu "defops"
-{
-    "Twm"		f.title
-    "Xterm"		!"xterm&"
-    "Calculator"	!"xcalc&"
-    "Xman"		!"xman &"
-    "Xmag"		!"xmag&"
-    ""			f.nop
-    "Restart"		f.restart
-    "Exit"		f.quit
-}
-
-menu "windowops" {
-    "Windows"		f.title
-    "Occupy"		f.occupy
-    "Occupy All"	f.occupyall
-    "Iconify"		f.iconify
-    "Refresh"		f.refresh
-    "Vanish"		f.vanish
-    "Info"		f.identify
-    ""			f.separator
-    "Resize"		f.resize
-    "Move"		f.move
-    "Adopt Window"	f.adoptwindow
-    "Animate"		f.startanimation
-    "Don't animate"	f.stopanimation
-    ""			f.separator
-    "Send Delete"	f.delete
-    "Kill Window"	f.destroy
-    "Pin menu"		f.pin
-}
-
-menu "windowmenu" {
-    "Occupy ..."	f.occupy
-    "Occupy All"	f.occupyall
-    "Iconify"		f.iconify
-    "RaiseLower"	f.raiselower
-    "Refresh"		f.winrefresh
-    "Zoom"		f.menu "Zoom"
-    "Vanish"		f.vanish
-    "Focus"		f.focus
-    "Unfocus"		f.unfocus
-    ""			f.separator
-    "Send Delete"	f.delete
-    "Kill Window"	f.destroy
-    "Resize..." 	f.resize
-    "Move..."		f.move
-}
-
-menu "iconmenu" {
-    "Actions"		f.title
-    ""			f.separator
-    "Restore"		f.iconify
-    "Move"		f.move
-    "Occupy ..."	f.occupy
-    "Occupy All"	f.occupyall
-    ""			f.separator
-    "Send Delete"	f.delete
-    "Kill Window"	f.destroy
+  BorderColor           "steelblue"
+
+  BorderTileBackground  "lavender"
+  BorderTileForeground  "lavender"
+
+  DefaultBackground     "grey70"
+  DefaultForeground     "black"
+
+  TitleBackground       "lavender"
+  TitleForeground       "black" 
+
+  MenuBackground        "lavender"
+  MenuForeground        "black"
+  MenuTitleBackground   "darkorange"
+  MenuTitleForeground   "black"
+  MenuShadowColor 	"gray15"
+
+  IconBackground        "black"
+  IconForeground        "white"
+  IconBorderColor       "gray45"
+
+  IconManagerBackground "lavender"
+  IconManagerForeground "black"
+  IconManagerHighlight  "firebrick"
+
+  MapWindowBackground   "lavender"
+  MapWindowForeground   "black"	
+}
+
+Monochrome
+{
+    BorderColor 		"black"
+
+    BorderTileForeground 	"black"
+    BorderTileBackground 	"white"
+
+    TitleForeground 		"black"
+    TitleBackground 		"white"
+
+    MenuForeground 		"black"
+    MenuBackground 		"white"
+    MenuTitleForeground 	"black"
+    MenuTitleBackground 	"white"
+
+    MapWindowForeground 	"white"
+    MapWindowBackground 	"white"
 }
 
+menu "NetBSD"
+{
+    "NetBSD"			f.title
+    ""				f.separator
+    " Terminal"			!"uxterm &"
+    " Calculator"		!"xcalc &"
+    " Clock"			!"xclock -digital &"
+    " XEyes"			!"xeyes &"
+#    ""				f.separator
+#    " Applications"		f.menu "appmenu"
+    ""				f.separator
+    " Restart CTWM"		f.twmrc
+    " Quit"			f.quit
+}
+
+# TODO: import and integrate this script
+#syscmd(/usr/X11R7/libexec/ctwm_menu)
+
+menu "titleops"
+{
+    "Window"       f.title
+    ""             f.separator
+    " Iconify"     f.iconify
+    " Resize"      f.resize
+    " Move"        f.move
+    ""             f.separator
+    " Raise"       f.raise
+    " Lower"       f.lower
+    ""             f.separator
+    " Zoom"        f.fullzoom
+    " Zoom-V"      f.zoom
+    " Zoom-H"      f.horizoom
+    ""             f.separator
+    " Kill"        f.destroy
+    " Close"       f.delete
+}
+
+IconManagerDontShow
+{
+} 
+
+OccupyAll 
+{
+   "XClock"
+   "xsm"
+   "xconsole"
+   "XVidCap"
+}
+
+AlwaysOnTop
+{
+   "XVidCap"
+}
+
+NoTitle 
+{
+   "TWM Icon Manager"
+   "WorkSpaceManager"
+}
+
+WindowRingExclude
+{
+   "TWM Icon Manager"
+   "WorkSpaceManager"
+   "XClock"
+   "xsm"
+   "xconsole"
+}
+
+StartIconified 
+{ 
+}
+
+NoBorder
+{
+   "TWM Icon Manager"
+}
+
+Function "raise-move"          { f.raise f.deltastop f.forcemove }
+Function "raise-and-resize"    { f.raise f.deltastop f.resize }
+
+# These are basically essential for basic functionality.
+
+Button1 =	: title		: f.function "raise-move"
+Button2 =	: title		: f.function "raise-and-resize"
+Button3 =	: title | frame	: f.menu "titleops"
+
+Button1 =	: frame		: f.function "raise-and-resize"
+
+Button1 =	: icon | iconmgr	: f.iconify
+Button2 =	: icon			: f.move
+Button3 =	: icon | iconmgr	: f.raiselower
+
+Button1 =	: root		: f.menu "NetBSD"
+Button2 =	: root		: f.menu "TwmAllWindows"
+Button3 =	: root		: f.menu "NetBSD"
+
+#
+# Mod1 is the "Alt/Meta" key.
+# Mod4 is the "OS" key.
+#
+
+Button1 = mod1	: window	: f.forcemove
+Button1 = mod4	: window	: f.forcemove
+Button3 = mod1	: window 	: f.resize
+Button3 = mod4	: window 	: f.resize
+
+"Up"     = mod4           : all : f.upworkspace
+"Down"   = mod4           : all : f.downworkspace
+"Left"   = mod4           : all : f.prevworkspace
+"Right"  = mod4           : all : f.nextworkspace
+
+"Up"     = mod1 | control : all : f.upworkspace
+"Down"   = mod1 | control : all : f.downworkspace
+"Left"   = mod1 | control : all : f.prevworkspace
+"Right"  = mod1 | control : all : f.nextworkspace
+
+"1"      = mod1 | control : all : f.gotoworkspace "1"
+"2"      = mod1 | control : all : f.gotoworkspace "2"
+"3"      = mod1 | control : all : f.gotoworkspace "3"
+"4"      = mod1 | control : all : f.gotoworkspace "4"
+"5"      = mod1 | control : all : f.gotoworkspace "5"
+"6"      = mod1 | control : all : f.gotoworkspace "6"
+"7"      = mod1 | control : all : f.gotoworkspace "7"
+"8"      = mod1 | control : all : f.gotoworkspace "8"
+"9"      = mod1 | control : all : f.gotoworkspace "9"
+
+"1"      = mod4 : all : f.gotoworkspace "1"
+"2"      = mod4 : all : f.gotoworkspace "2"
+"3"      = mod4 : all : f.gotoworkspace "3"
+"4"      = mod4 : all : f.gotoworkspace "4"
+"5"      = mod4 : all : f.gotoworkspace "5"
+"6"      = mod4 : all : f.gotoworkspace "6"
+"7"      = mod4 : all : f.gotoworkspace "7"
+"8"      = mod4 : all : f.gotoworkspace "8"
+"9"      = mod4 : all : f.gotoworkspace "9"
+
+#
+# "Windows" style keyboard shortcuts
+#
+
+"Tab"    = mod1           : all : f.warpring "next"
+"Tab"    = mod1 | s       : all : f.warpring "prev"
+"Tab"    = mod4           : all : f.warpring "next"
+"Tab"    = mod4 | s       : all : f.warpring "prev"
+"space"  = mod1           : window : f.menu "titleops"
+"F4"     = mod1           : window : f.delete
+
+#
+# "Mac" style keyboard shortcuts
+#
+
+"w"      = mod4           : window : f.delete
+"m"      = mod4           : window : f.iconify
+
+#
+# "evilwm" style keyboard shortcuts
+#
+
+# it is useful to be able to spawn a terminal without clicking.
+"Return" = mod1 | c : all : !"uxterm &"
+"Return" = mod4 | s : all : !"uxterm &"
+
+"slash"  = mod1 | c : all : f.menu "TwmAllWindows"
+"slash"  = mod4 : all     : f.menu "TwmAllWindows"
+"p"      = mod1 | c : all : f.menu "NetBSD"
+"p"      = mod4 : all     : f.menu "NetBSD"
+
+# vi-style directions
+"j"      = mod1 | control : window : f.jumpdown "10"
+"k"      = mod1 | control : window : f.jumpup "10"
+"h"      = mod1 | control : window : f.jumpleft "10"
+"l"      = mod1 | control : window : f.jumpright "10"
+
+"j"      = mod4 : window : f.jumpdown "10"
+"k"      = mod4 : window : f.jumpup "10"
+"h"      = mod4 : window : f.jumpleft "10"
+"l"      = mod4 : window : f.jumpright "10"
+
+"j"      = mod4 | s : window : f.changesize "bottom +10"
+"k"      = mod4 | s : window : f.changesize "bottom -10"
+"h"      = mod4 | s : window : f.changesize "right -10"
+"l"      = mod4 | s : window : f.changesize "right +10"
+
+"j"      = mod1 | c | s : window : f.changesize "bottom +10"
+"k"      = mod1 | c | s : window : f.changesize "bottom -10"
+"h"      = mod1 | c | s : window : f.changesize "right -10"
+"l"      = mod1 | c | s : window : f.changesize "right +10"

Reply via email to