💾 Archived View for mirrors.apple2.org.za › archive › apple2.caltech.edu › shellprogs › mugsrc2.0a.t… captured on 2024-05-10 at 11:54:13.
⬅️ Previous capture (2023-01-29)
-=-=-=-=-=-=-
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 >c 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"