Date: Tue, 02 May 1995 10:51:15 +0900 From: NIIMI Satoshi <sa2c@and.or.jp> To: "Jordan K. Hubbard" <jkh@time.cdrom.com> Cc: hackers@FreeBSD.org Subject: Re: Hackers - send me your setups! Message-ID: <199505020151.KAA04819@us.and.or.jp> In-Reply-To: "Jordan K. Hubbard"'s message of Mon, 01 May 1995 14:10:18 -0700
next in thread | raw e-mail | index | archive | help
I'm not a hacker and the setup is not very good, but this might be a
sample for Japanese users.
I'm currently using a Canna for Japanese input. Editor is Mule.
Window Manager is fvwm. (I want to see better setup :-)
--
NIIMI Satoshi
# This is a shell archive. Save it in a file, remove anything before
# this line, and then unpack it by entering "sh file". Note, it may
# create directories; files and directories will be owned by you and
# have default permissions.
#
# This archive contains:
#
# .Xmodmap
# .Xresources
# .canna
# .cshrc
# .emacs
# .forward
# .fvwmrc
# .login
# .maildelivery
# .mh_profile
# .netrc
# .ppp.conf
# .ppp.linkup
# .xsession
#
echo x - .Xmodmap
sed 's/^X//' >.Xmodmap << 'END-of-.Xmodmap'
Xclear mod1
Xkeycode 113 = Kanji
Xadd mod1 = Alt_L
Xkeycode 22 = BackSpace
END-of-.Xmodmap
echo x - .Xresources
sed 's/^X//' >.Xresources << 'END-of-.Xresources'
X*customization: -color
XKTerm*allowSendEvents: true
XKTerm*VT100.Translations: #override \n\
X <Key>Kanji: begin-conversion(_JAPANESE_CONVERSION)
XKTerm*VT100*fontList: -*-fixed-medium-r-normal--16-*
X*vt100.eightBitInput: false
X*ttyModes: erase ^H
X! Mule
XEmacs*FontSetList: 16
XEmacs*FontSet-16:\
X -*-fixed-medium-r-*--16-*-iso8859-1,\
X -*-fixed-medium-r-*--16-*-jisx0208.1983-*
XEmacs*Background: gray
XEmacs.Geometry: 80x39
Xmule*ScrollBars: False
X! Kinput2
XKinput2*Font: -*-fixed-medium-r-normal--16-*-*-*-c-*-iso8859-1
XKinput2*KanjiFont: -*-fixed-medium-r-normal--16-*-*-*-c-*-jisx0208.1983-0
XKinput2*KanaFont: -*-fixed-medium-r-normal--16-*-*-*-c-*-jisx0201.1976-0
XKinput2*defaultFontList: -*-fixed-medium-r-normal--16-*-*-*-c-*
X! XBiff
XXBiff*fullPixmap: mailfull
XXBiff*fullPixmapMask: mailfullmsk
XXBiff*emptyPixmap: mailempty
XXBiff*emptyPixmapMask: mailemptymsk
XXBiff*flip: false
XXBiff*shapeWindow: true
END-of-.Xresources
echo x - .canna
sed 's/^X//' >.canna << 'END-of-.canna'
X(setq romkana-table "default.kp")
X
X(use-dictionary
X "iroha"
X "fuzokugo"
X "hojomwd"
X "hojoswd"
X :bushu "bushu"
X :user "user"
X )
X
X(global-set-key "\F1" 'extend-mode)
X(global-set-key "\Delete" 'delete-previous)
X(set-key 'alpha-mode "\C-o" 'self-insert)
X(set-key 'alpha-mode "\C-\" 'japanese-mode)
X(set-key 'empty-mode "\C-o" 'undefined)
X(set-key 'empty-mode "\C-\" 'alpha-mode)
END-of-.canna
echo x - .cshrc
sed 's/^X//' >.cshrc << 'END-of-.cshrc'
Xset history=1000
Xset savehist=1000
Xset path = ( $HOME/bin /usr/local/bin /usr/X11R6/bin /usr/games \
X /usr/bin /bin /usr/sbin /sbin)
X
X# These settings are for interactive shell only
Xif ($?prompt) then
X alias t term /dev/cuaa1
X alias ls ls -F
X alias sless env LESSCHARSET=sjis less
X set prompt="`whoami`@`hostname -s`% "
X set filec
X if ($?tcsh) then
X bindkey ^W backward-delete-word
X set prompt="$user@%m:%~%% "
X endif
Xendif
X
Xsetenv BLOCKSIZE K
Xsetenv PAGER less
Xsetenv LESS -Msc
Xsetenv LESSCHARSET japanese-jis
Xsetenv TMPDIR /tmp
Xsetenv CVSROOT ~/cvs
END-of-.cshrc
echo x - .emacs
sed 's/^X//' >.emacs << 'END-of-.emacs'
X(setq load-path (cons (expand-file-name "~/Elisp") load-path))
X
X(put 'eval-expression 'disabled nil)
X
X(if (eq window-system 'x)
X (progn
X (setq default-frame-alist
X (append '((width . 80) (height . 39))
X default-frame-alist))
X;; (load "hilit19")
X )
X (load "term/bobcat")
X )
X
X(display-time)
X
X(add-hook 'text-mode-hook
X '(lambda () (auto-fill-mode t)))
X
X(if (and (boundp 'CANNA) CANNA)
X (canna))
X
X;; for tm
X(load "tm-setup")
X(gnusutil-add-group "rim" '(*autoconv* . *junet*))
X;;(load "mime-setup")
X
X(setq mail-yank-prefix "> "
X mail-default-reply-to "sa2c@st.rim.or.jp")
X
X(setq make-backup-files nil)
X
X(setq gnus-use-generic-path t
X gnus-use-generic-from t
X gnus-local-distributions nil
X gnus-required-headers '(From Newsgroups Subject Path))
X
X(add-hook 'gnus-select-group-hook
X '(lambda () (gnus-summary-sort-by-date nil)))
X
X(setq gnus-author-copy
X "|/usr/local/lib/mh/rcvstore +Article")
X
X(setq gnus-mail-reply-method 'gnus-mail-reply-using-mhe
X gnus-mail-forward-method 'gnus-mail-forward-using-mhe
X gnus-mail-other-window-method 'gnus-mail-other-window-using-mhe)
X
X(setq gnus-ignored-headers
X "^Path:\\|^Posting-Version:\\|^Article-I.D.:\\|^Expires:\\|^Date-Received:\\|^References:\\|^Control:\\|^Xref:\\|^Lines:\\|^Posted:\\|^Relay-Version:\\|^Message-ID:\\|^Nf-ID:\\|^Nf-From:\\|^Approved:\\|^Sender:\\|^Received:")
X
X(setq gnus-secondary-servers '(("us.and.or.jp") (":Mail")))
X
X;; for mh-e
X(global-set-key "\C-cr" 'mh-rmail)
X(global-set-key "\C-xm" 'mh-smail)
X(global-set-key "\C-x4m" 'mh-smail-other-window)
X
X;; for html-mode
X(autoload 'html-mode "html-mode" "HTML major mode." t)
X(or (assoc "\\.html$" auto-mode-alist)
X (setq auto-mode-alist (cons '("\\.html$" . html-mode)
X auto-mode-alist)))
X
X;; for w3
X(autoload 'w3-preview-this-buffer "w3" "WWW Previewer" t)
X(autoload 'w3-follow-url-at-point "w3" "Find document at pt" t)
X(autoload 'w3 "w3" "WWW Browser" t)
X(autoload 'w3-open-local "w3" "Open local file for WWW browsing" t)
X(autoload 'w3-fetch "w3" "Open remote file for WWW browsing" t)
X(autoload 'w3-use-hotlist "w3" "Use shortcuts to view WWW docs" t)
X(autoload 'w3-show-hotlist "w3" "Use shortcuts to view WWW docs" t)
X(autoload 'w3-follow-link "w3" "Follow a hypertext link." t)
X(autoload 'w3-batch-fetch "w3" "Batch retrieval of URLs" t)
X(autoload 'url-get-url-at-point "url" "Find the url under the cursor" nil)
X(autoload 'url-file-attributes "url" "File attributes of a URL" nil)
X(autoload 'url-popup-info "url" "Get info on a URL" t)
X(autoload 'url-retrieve "url" "Retrieve a URL" nil)
X(autoload 'url-buffer-visiting "url" "Find buffer visiting a URL." nil)
X
X(autoload 'gopher-dispatch-object "gopher" "Fetch gopher dir" t)
X
X(setq url-proxy-services '(("http" . "http://127.0.0.1")))
END-of-.emacs
echo x - .forward
sed 's/^X//' >.forward << 'END-of-.forward'
X"| /usr/local/lib/mh/slocal -user sa2c"
END-of-.forward
echo x - .fvwmrc
sed 's/^X//' >.fvwmrc << 'END-of-.fvwmrc'
X# Unfortunately, order does matter in this file
X# The correct order for inserting configurations is:
X# 1. Colors
X# 2. Assorted configuration paramters such as ClickToFocus, or MWMBorders
X# 3. Path setup (ModulePath, PixmapPath, IconPath)
X# 4. Style settings, including the default style Style "*" ...
X# 5. InitFunction and ResetFunction definitions.
X# 6. Other Functions. Functions cannot be forward referenced from
X# other functions, but they can be backward referenced.
X# 7. Menus definitions. Same caveats about forward referencing
X# 8. Key and Mouse Bindings.
X# 9. Module options.
X
X# The order of steps 5, 6, and 7 is not critical, as long as there are
X# no forward references to functions or menus.
X
X# If you get it wrong, the most common problem is that color or font settings
X# are ignored
X
X###########################################################################
X# set up the colors
X#
X# OK some people like bright clear colors on their window decorations.
X# These people, I guess would mostly be from nice sunny/good weather places
X# line California.
X#
X# StdForeColor Black
X# StdBackColor LightSkyBlue
X# HiForeColor yellow
X# HiBackColor PeachPuff1
X# PagerBackColor BlanchedAlmond
X
X# Me, I'm from Upstate New York, and live in New Hampshire, so I prefer
X# these dark muddy colors...
X
X# this is used for the selected window
XHiForeColor Black
X#HiBackColor #c06077
XHiBackColor LightSkyBlue
X#HiBackColor Blue
X
XPagerBackColor SlateGrey
XPagerForeColor DarkRed
X
XStickyForeColor Black
XStickyBackColor gray
X
X# Menu colors
XMenuForeColor Black
XMenuBackColor grey
XMenuStippleColor SlateGrey
X#Pager -1 -1
X
X############################################################################
X# Now the fonts - one for menus, another for window titles, another for icons
X#Font -adobe-helvetica-medium-r-*-*-12-*-*-*-*-*-*-*
X#Font -*-times-medium-i-*-*-*-120-*-*-*-*-*-*
XFont -adobe-helvetica-bold-r-*-*-12-*-*-*-*-*-*-*
XWindowFont -adobe-helvetica-bold-r-*-*-12-*-*-*-*-*-*-*
X#IconFont -adobe-helvetica-medium-r-*-*-11-*-*-*-*-*-*-*
XIconFont fixed
X
X###########################################################################
X# Set up the major operating modes
X#
X######################## FOCUS STUFF ##############################
X# Set windows to auto-raise after 750 milliseconds if you like it.
X# Autoraise can sometimes obscure pop-up windows. Performance is now
X# similar to olvwm's auto-raise feature.
X#AutoRaise 750
X
X# Normally, we'll be in focus-follows mouse mode, but uncomment this
X# for mwm-style click-to-focus
X#ClickToFocus
X
X######################## ICON STUFF ##############################
X# Auto Place Icons is a nice feature....
X# This creates two icon boxes, one on the left side, then one on the
X# bottom. Leaves room in the upper left for my clock and xbiff,
X# room on the bottom for the Pager.
X#IconBox -150 90 -5 -140
X#IconBox 5 -140 -140 -5
XIconBox -70 1 -1 -140
X
X# If you uncomment this, and make sure that the WindowList is bound to
X# something, it works pretty much like an icon manager.
X#SuppressIcons
X
X# StubbornIcons makes icons de-iconify into their original position on the
X# desktop, instead of on the current page.
X#StubbornIcons
X
X# With AutoPlacement, icons will normally place themselves underneath active
X# windows. This option changes that.
X#StubbornIconPlacement
X
X# If you want ALL you icons to follow you around the desktop (Sticky), try
X# this
X#StickyIcons
X
X######################## MWM EMULATION #######################
X#
X# My feeling is that everyone should use MWMDecorHints and MWMFunctionHints,
X# since some applications depend on having the window manager respect them
X
X# MWMFunction hints parses the function information in the MOTIF_WM_HINTS
X# property, and prohibits use of these functions on the window. Appropriate
X# portions of the window decorations are removed.
XMWMFunctionHints
X
X# MWM is kinda picky about what can be done to transients, and it was keeping
X# me from iconifying some windows that I like to iconify, so here's an
X# over-ride that will allow me to do the operation, even tough the menu
X# item is shaded out.
XMWMHintOverride
X
X# MWMDecor hints parses the decoration information in the MOTIF_WM_HINTS
X# property, and removes these decoratons from the window. This does not affect
X# the functions that can be performed via the menus.
XMWMDecorHints
X
X# These are affect minor aspects for the look-and-feel.
X# Sub-menus placement mwm-style?
X# MWMMenus
X# mwm-style border reliefs (less deep than default fvwm) ?
X# MWMBorders
X# Maximize button does mwm-inversion thingy
X# MWMButtons
X######################## MISCELLANEOUS STUFF #######################
X# If you don't like the default 150 msec click delay for the complex functions
X# change this and uncomment it.
X#ClickTime 150
X
X# OpaqueMove has a number (N) attached to it (default 5).
X# if the window occupies less than N% of the screen,
X# then opaque move is used. 0 <= N <= 100
X# OpaqueMove 100
X
X# flip by whole pages on the edge of the screen.
XEdgeScroll 100 100
X
X# A modest delay before flipping pages seems to be nice...
X# I thresh in a 50 pixel Move-resistance too, just so people
X# can try it out.
XEdgeResistance 250 50
X
X
X######################## WINDOW PLACEMENT #######################
X# RandomPlacement prevents user interaction while placing windows:
X#RandomPlacement
X
X# SmartPlacement makes new windows pop-up in blank regions of screen
X# if possible, or falls back to random or interactive placement.
XSmartPlacement
X
X# With SmartPlacement, windows will normally place themselves over icons.
X# Uncomment this to change that.
X#StubbornPlacement
X
X# NoPPosition instructs fvwm to ignore the PPosition field in window
X# geometry hints. Emacs annoyingly sets PPosition to (0,0)!
XNoPPosition
X
X
X######################## DECORATIONS #######################
X# If you want decorated transient windows, uncomment this:
X#DecorateTransients
X
X
X###########################################################################
X# Set up the virtual desktop and pager
X
X#set the desk top size in units of physical screen size
XDeskTopSize 2x2
X
X# and the reduction scale used for the panner/pager
XDeskTopScale 32
X
X##########################################################################
X# Module path and paths to the icons
X#
X# ModulePath is a colon-separated list, just like regular unix PATH
XModulePath /usr/X11R6/lib/X11/fvwm/
XPixmapPath /usr/X11R6/include/X11/pixmaps/
XIconPath /usr/X11R6/include/X11/bitmaps/
X
X############################################################################
X# Set the decoration styles and window options
X# Order is important!!!!
X# If compatible styles are set for a single window in multiple Style
X# commands, then the styles are ORed together. If conflicting styles
X# are set, the last one specified is used.
X
X# These commands should command before any menus or functions are defined,
X# and before the internal pager is started.
X
X# change the default width.
XStyle "*" BorderWidth 5, HandleWidth 5, Color Black/gray,Icon unknown1.xpm
X
XStyle "Fvwm*" NoTitle, NoHandles, Sticky, WindowListSkip,BorderWidth 0
XStyle "Fvwm Pager" StaysOnTop
XStyle "FvwmPager" StaysOnTop
XStyle "FvwmBanner" StaysOnTop
XStyle "GoodStuff" NoTitle, NoHandles, Sticky, WindowListSkip,BorderWidth 0
XStyle "*lock" NoTitle, NoHandles, Sticky, WindowListSkip
XStyle "Maker" StartsOnDesk 1
XStyle "matlab" StartsOnDesk 3
XStyle "signal" StartsOnDesk 3
XStyle "rxvt" Icon term.xpm
XStyle "xterm" Icon xterm.xpm, Color black/grey
XStyle "kterm" Icon xterm.xpm, Color black/grey
XStyle "Appointment" Icon datebook.xpm, NoButton 2, NoButton 4
XStyle "xcalc" Icon xcalc.xpm, NoButton 2
XStyle "xbiff" Icon mail1.xpm, NoButton 2
XStyle "xmh" Icon mail1.xpm, StartsOnDesk 2, NoButton 2
XStyle "xman" Icon xman.xpm
XStyle "xvgr" Icon graphs.xpm
XStyle "matlab" Icon math4.xpm
XStyle "xmag" Icon mag_glass.xpm
XStyle "xgraph" Icon graphs.xpm
XStyle "GoodStuff" Icon toolbox.xpm
XStyle "xconsole" NoTitle, WindowListSkip, NoHandles
XStyle "netscape" Icon /home/sa2c/xpm/netscape.xpm
XStyle "Mosaic" Icon /home/sa2c/xpm/mosaic.xpm
XStyle "XEyes" NoTitle, NoHandles, Sticky, WindowListSkip
XStyle "XBiff" NoTitle, NoHandles, Sticky, WindowListSkip
XStyle "XLoad" NoTitle, NoHandles, Sticky, WindowListSkip
X
X# Change the Maximize and iconify buttons to up and down triangles.
X
XButtonStyle : 2 4 50x35@1 65x65@0 35x65@0 50x35@1
XButtonStyle : 4 4 50x65@1 35x35@1 65x35@1 50x65@0
X
X#############################################################################
X
X# Stuff to do at start-up
X
XFunction "InitFunction"
X Module "I" GoodStuff
X# Module "I" FvwmPager 0 3
X# Exec "I" exec kterm -geometry 80x24+0+0 -ls -km sjis &
X# Wait "I" kterm
X# GotoPage "I" 1 0
X# Exec "I" exec mule -geometry 80x36+0+0 &
X# Wait "I" mule
X# GotoPage "I" 0 0
X# Desk "I" 0 0
XEndFunction
X
XFunction "RestartFunction"
X Module "I" GoodStuff
XEndFunction
X
X
X############################################################################
X# Now define some handy complex functions
X
X# This one moves and then raises the window if you drag the mouse,
X# only raises the window if you click, or does a RaiseLower if you double
X# click
XFunction "Move-or-Raise"
X Move "Motion"
X Raise "Motion"
X Raise "Click"
X RaiseLower "DoubleClick"
XEndFunction
X
X# This one maximizes vertically if you click (leaving room for the GoodStuff bar at the
X# bottom, or does a full maximization if you double click, or a true full vertical
X# maximization if you just hold the mouse button down.
XFunction "maximize_func"
X Maximize "Motion" 0 100
X Maximize "Click" 0 80
X Maximize "DoubleClick" 100 100
XEndFunction
X
X
X# This one moves and then lowers the window if you drag the mouse,
X# only lowers the window if you click, or does a RaiseLower if you double
X# click
XFunction "Move-or-Lower"
X Move "Motion"
X Lower "Motion"
X Lower "Click"
X RaiseLower "DoubleClick"
XEndFunction
X
X# This one moves or (de)iconifies:
XFunction "Move-or-Iconify"
X Move "Motion"
X Iconify "DoubleClick"
XEndFunction
X
X# This one resizes and then raises the window if you drag the mouse,
X# only raises the window if you click, or does a RaiseLower if you double
X# click
XFunction "Resize-or-Raise"
X Resize "Motion"
X Raise "Motion"
X Raise "Click"
X RaiseLower "DoubleClick"
XEndFunction
X
X
X# This is provided as a hint only.
X# Move to a known page on the desktop, then start an application in a
X# known location. Could also switch to a known desktop, I guess
X#Function "abs_coord"
X# GoToPage "Immediate" 1,1
X# Exec "Immediate" exec xcalc -geometry +100+100&
X#EndFunction
X
X
X##############################################################################
X#now define the menus - defer bindings until later
X
X# This menu is invoked as a sub-menu - it allows you to quit,
X# restart, or switch to another WM.
XPopup "Quit-Verify"
X Title "Really Quit Fvwm?"
X Quit "Yes, Really Quit"
X Restart "Restart Fvwm" fvwm
X Restart "Start twm" twm
X Restart "Start tvtwm" tvtwm
X Restart "Start mwm" mwm
X Restart "Start olwm" /usr/openwin/bin/olwm
X Nop ""
X Nop "No, Don't Quit"
XEndPopup
X
X# Provides a list of modules to fire off
XPopup "Module-Popup"
X Title "Modules"
X Module "GoodStuff" GoodStuff
X Module "Clean-Up" FvwmClean
X Module "Identify" FvwmIdent
X Module "SaveDesktop" FvwmSave
X Module "Debug" FvwmDebug
X Module "Pager" FvwmPager 0 3
X Module "FvwmWinList" FvwmWinList
X Module "IconBox" FvwmIconBox
XEndPopup
X
X# This menu will fire up some very common utilities
XPopup "Utilities"
X Title "Utilities"
X Exec "Xterm" exec xterm &
X Exec "Kterm" exec kterm -km sjis &
X Exec "Mule" exec mule &
X Exec "Netscape" exec netscape &
X Exec "Mosaic" exec mosaic &
X Nop ""
X Quit "Quit Fvwm"
X Restart "Restart Fvwm" fvwm
X Nop ""
X Popup "Modules" Module-Popup
X Nop ""
X Popup "Exit Fvwm" Quit-Verify
XEndPopup
X
X# This defines the most common window operations
XPopup "Window Ops"
X Title "Window Ops"
X Function "Move" Move-or-Raise
X Function "Resize" Resize-or-Raise
X Raise "Raise"
X Lower "Lower"
X Iconify "(De)Iconify"
X Stick "(Un)Stick"
X Function "(Un)Maximize" maximize_func
X Nop ""
X Destroy "Destroy"
X Close "Close"
X Nop ""
X Refresh "Refresh Screen"
XEndPopup
X
X# A trimmed down version of "Window Ops", good for binding to decorations
XPopup "Window Ops2"
X Function "Move" Move-or-Raise
X Function "Resize" Resize-or-Raise
X Raise "Raise"
X Lower "Lower"
X Iconify "Iconify"
X Stick "(Un)Stick"
X Nop ""
X Destroy "Destroy"
X Close "Close"
X Nop ""
X Module "ScrollBar" FvwmScroll 2 2
XEndPopup
X
X#############################################################################
X# One more complex function - couldn't be defined earlier because it used
X# pop-up menus
X#
X# This creates a motif-ish sticky menu for the title-bar window-ops
X# pop-up
X# Menu acts like normal twm menu if you just hold the button down,
X# but if you click instead, the menu stays up, motif style
XFunction "window_ops_func"
X PopUp "Click" Window Ops2
X PopUp "Motion" Window Ops2
X# Motif would add:
X# I'll add it too, it can be mighty handy.
X Close "DoubleClick"
XEndFunction
X
X
X##############################################################################
X# This defines the mouse bindings
X
X# First, for the mouse in the root window
X# Button 1 gives the Utilities menu
X# Button 2 gives the Window Ops menu
X# Button 3 gives the WindowList (like TwmWindows)
X# I use the AnyModifier (A) option for the modifier field, so you can hold down
X# any shift-control-whatever combination you want!
X
X# Button Context Modifi Function
XMouse 1 R A PopUp "Utilities"
XMouse 2 R A PopUp "Window Ops"
XMouse 3 R A Module "winlist" FvwmWinList transient
X
X
X
X# Now the title bar buttons
X# Any button in the left title-bar button gives the window ops menu
X# Any button in the right title-bar button Iconifies the window
X# Any button in the rightmost title-bar button maximizes
X# Note the use of "Mouse 0" for AnyButton.
X
X# Button Context Modifi Function
XMouse 0 1 A Function "window_ops_func"
XMouse 0 2 A Function "maximize_func"
XMouse 0 4 A Iconify
X
X# Now the rest of the frame
X# Here I invoke my complex functions for Move-or-lower, Move-or-raise,
X# and Resize-or-Raise.
X# Button 1 in the corner pieces, with any modifiers, gives resize or raise
XMouse 1 FS A Function "Resize-or-Raise"
X# Button 1 in the title, sides, or icon, w/ any modifiers, gives move or raise
XMouse 1 T A Function "Move-or-Raise"
X
X# Button 1 in an icons gives move for a drag, de-iconify for a double-click,
X# nothing for a single click
X# Button 2 in an icon, w/ any modifiers, gives de-iconify
X
XMouse 1 I A Function "Move-or-Iconify"
XMouse 2 I A Iconify
X
X# Button 2 in the corners, sides, or title-bar gives the window ops menu
XMouse 2 FST A Function "window_ops_func"
X# Button 3 anywhere in the decoration (except the title-bar buttons)
X# does a raise-lower
XMouse 3 TSIF A RaiseLower
X
X# Button 3 in the window, with the Modifier-1 key (usually alt or diamond)
X# gives Raise-Lower. Used to use control here, but that interferes with xterm
XMouse 3 W M RaiseLower
X
X############################################################################
X# Now some keyboard shortcuts.
X
X# Arrow Keys
X# press arrow + control anywhere, and scroll by 1 page
XKey Left A C Scroll -100 0
XKey Right A C Scroll +100 +0
XKey Up A C Scroll +0 -100
XKey Down A C Scroll +0 +100
X
X# press arrow + meta key, and scroll by 1/10 of a page
XKey Left A MC Scroll -10 +0
XKey Right A MC Scroll +10 +0
XKey Up A MC Scroll +0 -10
XKey Down A MC Scroll +0 +10
X
X# press shift arrow + control anywhere, and move the pointer by 1% of a page
XKey Left A SC CursorMove -1 0
XKey Right A SC CursorMove +1 +0
XKey Up A SC CursorMove +0 -1
XKey Down A SC CursorMove +0 +1
X
X# press shift arrow + meta key, and move the pointer by 1/10 of a page
XKey Left A SM CursorMove -10 +0
XKey Right A SM CursorMove +10 +0
XKey Up A SM CursorMove +0 -10
XKey Down A SM CursorMove +0 +10
X
X# Keyboard accelerators
XKey F1 A M Popup "Utilities"
XKey F2 A M Popup "Window Ops"
XKey F3 A M Module "WindowList" FvwmWinList
XKey F4 A M Iconify
XKey F5 A M Move
XKey F6 A M Resize
XKey F7 A M CirculateUp
XKey F8 A M CirculateDown
X
XKey r A SC Resize
XKey m A SC Move
XKey h A SC CursorMove -10 +0
XKey j A SC CursorMove +0 +10
XKey k A SC CursorMove +0 -10
XKey l A SC CursorMove +10 +0
X
X#Page Up/Dapge Down keys are used to scroll by one desktop page
X# in any context, press page up/down + control
X# in root context, just pressing page up/down is OK
X#
X# I prefer the non-wrapping scroll. These are for example purposes only
X#Key Next A C Scroll 100000 0
X#Key Next R N Scroll 100000 0
X#Key Prior A C Scroll -100000 0
X#Key Prior R N Scroll -100000 0
X
X
X############################################################################
X############################################################################
X#Definitions used by the modules
X
X###################### GoodStuff button-bar ################################
X# Colors
X*GoodStuffFore Black
X*GoodStuffBack gray
X
X# Font
X*GoodStuffFont -adobe-helvetica-bold-r-*-*-10-*-*-*-*-*-*-*
X# Geometry - really likes to pick its own size, but giving a position is OK
X*GoodStuffGeometry -1-1
X
X# Layout: specify rows or columns, not both
X#*GoodStuffRows 1
X*GoodStuffColumns 1
X
X# Define the buttons to use.....
X*GoodStuff - mailempty Swallow "xclock" xclock -bg gray -geometry -1500-1500 -padding 0
X*GoodStuff mail mailempty Swallow "xbiff" xbiff -geometry -1500-1500
X*GoodStuff - whatever SwallowModule "FvwmPager" FvwmPager 0 0
X
X
X######################### No Clutter ########################################
X# I only wrote NoClutter as a simple test case, but maybe some big sites like
X# universities really have usage problems (too many open windows)....
X# Time delays are in seconds.
X*FvwmNoClutter 3600 Iconify 1
X*FvwmNoClutter 86400 Delete
X*FvwmNoCLutter 172800 Destroy
X
X########################## Window-Identifier ###############################
X# Just choose colors and a fonts
X*FvwmIdentBack MidnightBlue
X*FvwmIdentFore Yellow
X*FvwmIdentFont -adobe-helvetica-medium-r-*-*-12-*-*-*-*-*-*-*
X
X########################### Pager #########################################
X*FvwmPagerBack gray
X#*FvwmPagerFore #484048
X*FvwmPagerFore black
X#*FvwmPagerFont -adobe-helvetica-bold-r-*-*-10-*-*-*-*-*-*-*
X*FvwmPagerFont none
X#*FvwmPagerHilight #cab3ca
X*FvwmPagerHilight white
X*FvwmPagerGeometry -1-1
X#*FvwmPagerLabel 0 Misc
X#*FvwmPagerLabel 1 Maker
X#*FvwmPagerLabel 2 Mail
X#*FvwmPagerLabel 3 Matlab
X*FvwmPagerSmallFont 5x8
X
X
X##########################FvwmWinList##################################
X*FvwmWinListBack gray
X*FvwmWinListFore Black
X*FvwmWinListFont -adobe-helvetica-bold-r-*-*-12-*-*-*-*-*-*-*
X*FvwmWinListAction Click1 Iconify -1,Focus
X*FvwmWinListAction Click2 Iconify
X*FvwmWinListAction Click3 Module "FvwmIdent" FvwmIdent
X*FvwmWinListUseSkipList
X*FvwmWinListGeometry -0+0
END-of-.fvwmrc
echo x - .login
sed 's/^X//' >.login << 'END-of-.login'
X# stty crt erase ^h
Xumask 022
END-of-.login
echo x - .maildelivery
sed 's/^X//' >.maildelivery << 'END-of-.maildelivery'
XSender announce-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.announce"
XSender bugs-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.bugs"
XSender commit-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.commit"
XSender current-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.current"
XSender doc-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.doc"
XSender fs-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.fs"
XSender hackers-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.hackers"
XSender hardware-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.hardware"
XSender install-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.install"
XSender platforms-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.platforms"
XSender ports-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.ports"
XSender questions-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.questions"
XSender scsi-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.scsi"
XSender security-owner@FreeBSD.org | A "/usr/local/lib/mh/rcvstore +freebsd.security"
END-of-.maildelivery
echo x - .mh_profile
sed 's/^X//' >.mh_profile << 'END-of-.mh_profile'
XPath: Mail
Xrmmproc: /bin/rm
Xshowproc: /usr/local/bin/less
Xsend: -hencode
Xwhom: -hencode
Xscan: -form scancomps
Xinc: -form scancomps
XAliasfile: aliases
END-of-.mh_profile
echo x - .netrc
sed 's/^X//' >.netrc << 'END-of-.netrc'
Xmachine moon login sa2c
Xmachine mars login sa2c
Xmachine mercury login sa2c
Xmachine freebird login sa2c
Xdefault login ftp password sa2c@and.or.jp
END-of-.netrc
echo x - .ppp.conf
sed 's/^X//' >.ppp.conf << 'END-of-.ppp.conf'
Xdefault:
X set device /dev/cuaa1
X set speed 57600
X disable lqr
X deny lqr
X set dial "ABORT BUSY ABORT NO\\sCARRIER TIMEOUT 5 \"\" ATZ OK-ATZ-OK \\dATDT\\T TIMEOUT 40 CONNECT"
X set timeout 120
X set login "TIMEOUT 5 login:-\\r-login: \\U word: \\P"
X set escape 0xff
X
Xrim:
X set phone ****-****
X set authname Psa2c
X set authkey ********
X set openmode active
X set login "TIMEOUT 5 login:-\\r-login:"
X
Xand:
X set phone ****-****
X set authname sa2c
X set authkey ********
X set login "TIMEOUT 5 login:-\\r-login: ppp"
END-of-.ppp.conf
echo x - .ppp.linkup
sed 's/^X//' >.ppp.linkup << 'END-of-.ppp.linkup'
X#
X# If connected to and, nothing to be done.
X#
Xand:
X
X#
X# Otherwide, simply add peer as default gateway.
X#
XMYADDR:
X add 0 0 HISADDR
END-of-.ppp.linkup
echo x - .xsession
sed 's/^X//' >.xsession << 'END-of-.xsession'
X#!/bin/sh
X
Xif [ -f $HOME/.Xmodmap ]; then
X xmodmap $HOME/.Xmodmap
Xfi
Xif [ -f $HOME/.Xresources ]; then
X xrdb -load $HOME/.Xresources
Xfi
Xif [ -f $HOME/.Xauthority ]; then
X XAUTHORITY=$HOME/.Xauthority; export XAUTHORITY
Xfi
X
Xfvwm &
Xxsetroot -solid DarkSlateGray
X#xsetroot -solid black
X#xv -rmode 5 -root -quit freebsd.jpg &
Xxconsole -geometry 480x130+0-0 -daemon -fn fixed
X#oclock -geometry 90x90-0+0 -transparent &
X#xeyes -geometry 90x90+0+100 -outline 'dark gray' &
X#xload -geometry 90x90+0+200 -fn variable &
X#xbiff -geometry 90x90+0+300 &
Xbeforelight &
X#twm &
Xkinput2 &
X#/home/sa2c/bin/fvwm &
Xexec kterm -geometry 80x24+0+0 -ls -km sjis -title login
END-of-.xsession
exit
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?199505020151.KAA04819>