💾 Archived View for mirrors.apple2.org.za › archive › apple2.caltech.edu › shellprogs › mugsrc2.0a.t… captured on 2023-01-29 at 04:14:03.

View Raw

More Information

-=-=-=-=-=-=-

MUGS.RC - Configuration file for MuGS 2.0a
;			Written by Brian Tao, last revision: 93/02/28
;			MicroEmacs 3.11c GS Release 1.0 by Morgan Davis

set $discmd 0

; Pathname of MuGS user files (don't forget the trailing slash!)
	set %mugs "/GSHD/usr/home/MuGS/"

; Pathname of your home directory
	set %home "/GSHD/usr/home/"

; Pathname of temporary folder
	set %tempdir "/GSHD/usr/tmp/"

; Pathname of saved messages folder
	set %savedir "/GSHD/usr/home/Text/"

; Pathname of reply folder
	set %outgoing "/GSHD/usr/home/outgoing/"

; Pathname of mail spool folder
	set %maildir "/GSHD/usr/spool/mail/"

; Name of mailbox file (no trailing slash!)
	set %mailbox "incoming"

; Pathname of signature file
	set %signature "/GSHD/usr/home/MuGS/signature"

; How good are we at this? (0=beginner, 1=intermediate, 2=expert)
	set %userlevel 2

; Use Mufil for fast indexing?
	set %mufil TRUE

; Display index menu?
	set %menu TRUE

; Display first unread message on startup?
	set %unread TRUE

; Mark messages addressed to you?
	set %showmail TRUE

; Address or name used to scan for mail addressed to you
	set %yourname "login"

; Should text searches be case-sensitive?
	set %case FALSE

; Use regular expressions in text searches?
	set %regexp FALSE

; Make MuGS compatible with NetNews?
	set %netnews FALSE

; Name of organization
	set %organization "MuGS Research and Development Facility"

; List of user headers
	set %userheaders ""

; Character used in quoting messages
	set %quote "> "

; Delete mailbox without asking if all messages read?
	set %deletemail FALSE

; Address to send gripe mail
	set %gripe "taob@r-node.hub.org"

; Width of tab characters
	set %tab 5

; Scroll mode (0=jump, 1=smooth)
	set $sscroll 1

; Width of reformatted paragraphs in editor
	set $fillcol 72

; Don't change the following 9 lines!
	set %startup TRUE
	!if &exi "1/mugs.cmd"
		execute-file "1/mugs.cmd"
	!else
		print "[Unable to load 'mugs.cmd' overlay!  Press a key to exit...]"
		set %yn &gtc
		set $discmd 0
		!force exit-emacs
	!endif

; Key bindings for MuGS...
	macro-to-key ShowMessage		^M
	macro-to-key ShowIndex			i
	macro-to-key ShowIndex			I
	macro-to-key SaveMessage		s
	macro-to-key SaveMessage		S
	macro-to-key NextMessage		n
	macro-to-key NextMessage		N
	macro-to-key PrevMessage		p
	macro-to-key PrevMessage		P
	macro-to-key NextUnread			.
	macro-to-key PrevUnread			,
	macro-to-key ThreadForward		=
	macro-to-key ThreadBackward		-
	macro-to-key GotoMessage		g
	macro-to-key GotoMessage		G
	macro-to-key DeleteMessage		d
	macro-to-key DeleteMessage		D
	macro-to-key UndeleteMessage		u
	macro-to-key UndeleteMessage		U
	macro-to-key OpenMailbox		o
	macro-to-key OpenMailbox		O
	macro-to-key Search			/
	macro-to-key SearchAll			\
	macro-to-key Reply			r
	macro-to-key Reply			R
	macro-to-key Mail			m
	macro-to-key Mail			M
	macro-to-key Gripe			FNg
	macro-to-key Gripe			FNG
	macro-to-key QuoteLine			FN^I
	macro-to-key UnquoteLine		A-^I
	macro-to-key ExpandAlias		FNa
	macro-to-key ExpandAlias		FNA
	macro-to-key Send			FNs
	macro-to-key Send			FNS
	macro-to-key Help			FN?
	macro-to-key Help			FN/
	macro-to-key ShellCommand		!
	macro-to-key Quit			FNq
	macro-to-key Quit			FNQ
	macro-to-key Exit			FN^X

; Other useful key bindings...
	bind-to-key insert-file			FNo
	bind-to-key insert-file			FNO
	bind-to-key kill-region			FNd
	bind-to-key kill-region			FND
	bind-to-key kill-to-end-of-line		^Y
	bind-to-key yank			FNv
	bind-to-key yank			FNV
	bind-to-key copy-region			FNc
	bind-to-key copy-region			FNC
	bind-to-key fill-paragraph		FNf
	bind-to-key fill-paragraph		FNF
	bind-to-key buffer-position		FN'
	bind-to-key count-words			FN"
	bind-to-key beginning-of-file		A-^P	; option-up
	bind-to-key end-of-file			A-^N	; option-down
	bind-to-key beginning-of-line		A-^B	; option-left
	bind-to-key end-of-line			A-^F	; option-right
	bind-to-key next-word			FN^F	; Apple-right
	bind-to-key previous-word		FN^B	; Apple-left
	bind-to-key next-page			FN^N	; Apple-down
	bind-to-key previous-page		FN^P	; Apple-up
	bind-to-key set-mark			"FN "	; Apple-space

; Following lines are needed to work around MicroEMACS startup delay
	select-buffer "mugs.rc"
	end-of-file
	set-mark
	2 previous-line
	narrow-to-region
	select-buffer "Index"