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"