% Oberlin version.  Rhys Price Jones update sept 1995
% Reference Card for GNU Emacs version 18 on Unix systems
%**start of header
\newcount\columnsperpage

% This file can be printed with 1, 2, or 3 columns per page (see below).
% Specify how many you want here.  Nothing else needs to be changed.

\columnsperpage=3

% Copyright (c) 1986 Free Software Foundation, Inc.

% This file is not part of the GNU Emacs distribution (yet).

% This file is distributed in the hope that it will be useful,
% but WITHOUT ANY WARRANTY.  No author or distributor
% accepts responsibility to anyone for the consequences of using it
% or for whether it serves any particular purpose or describes
% any piece of software unless they say so in writing.  Refer to the
% GNU Emacs General Public License for full details.
%
% Permission is granted to copy, modify and redistribute this source
% file provided the copyright notice and permission notices are
% preserved on all copies.
%
% Permission is granted to process this file through TeX and print the
% results, provided the printed document carries copyright and
% permission notices identical to the ones below.

% This file is intended to be processed by plain TeX (TeX82).
%
% The final reference card has six columns, 
% three on each side of an 8.5 x 11 inch card.
% This file can be used to produce it in any of three ways:
% 1 column per page
%    produces six separate pages, each of which needs to be reduced to 80%.
%    This gives the best resolution.
% 2 columns per page
%    produces three already-reduced pages.
%    You will still need to cut and paste.
% 3 columns per page
%    produces two pages which must be printed sideways to make a
%    ready-to-use reference card.
%    For this you need a dvi device driver that can print sideways.
% Which mode to use is controlled by setting \columnsperpage above.
%
% Author:
%  Stephen Gildea
%  UUCP: mit-erl!gildea
%  Internet: gildea@erl.mit.edu
%
% Thanks to Paul Rubin, Bob Chassell, Len Tower, and Richard Mlynarik
% for their many good ideas.

\def\versionnumber{1.8}
\def\year{1986}
\def\version{November \year\ v\versionnumber}

\def\shortcopyrightnotice{\vskip 1ex plus 2 fill
  \centerline{\small \copyright\ \year\ Free Software Foundation, Inc.
  Permissions on back.  v\versionnumber}}

\def\copyrightnotice{
\vskip 1ex plus 2 fill\begingroup\small
\centerline{Copyright \copyright\ \year\ Free Software Foundation, Inc.}
\centerline{designed by Stephen Gildea, \version}
\centerline{for GNU Emacs version 18 on Unix systems}

Permission is granted to make and distribute copies of
this card provided the copyright notice and this permission notice
are preserved on all copies.

No author, least of all me, assumes any responsibility for any errors
on this card.\\
Oberlin customization by Karl Fogel.
\endgroup}

% make \bye not \outer so that the \def\bye in the \else clause below
% can be scanned without complaint.
\def\bye{\par\vfill\supereject\end}

\newdimen\intercolumnskip
\newbox\columna
\newbox\columnb

\def\ncolumns{\the\columnsperpage}

\message{[\ncolumns\space 
  column\if 1\ncolumns\else s\fi\space per page]}

% This multi-way format was designed by Stephen Gildea
% October 1986.
\if 1\ncolumns
  \hsize 4in
  \vsize 10in
  \hoffset -.7in
  \voffset -.7in
  \font\titlefont=cmbx10 scaled \magstep3
  \font\headingfont=cmbx10 scaled \magstep2
  \font\smallfont=cmr8
  \font\smallsy=cmsy8

  \footline{\hss\folio}
  \def\makefootline{\baselineskip10pt\hsize=6.5in\line{\the\footline}}
\else
  \hsize 3.2in
  \vsize 7.95in
  \hoffset -.75in
  \voffset -.745in
  \font\titlefont=cmbx10 scaled \magstep2
  \font\headingfont=cmbx10 scaled \magstep1
  \font\smallfont=cmr6
  \font\smallsy=cmsy6
  \font\eightrm=cmr8
  \font\eightbf=cmbx8
  \font\eightit=cmti8
  \font\eighttt=cmtt8
  \font\eightsy=cmsy8
  \textfont0=\eightrm
  \textfont2=\eightsy
  \def\rm{\eightrm}
  \def\bf{\eightbf}
  \def\it{\eightit}
  \def\tt{\eighttt}
  \normalbaselineskip=.8\normalbaselineskip
  \normallineskip=.8\normallineskip
  \normallineskiplimit=.8\normallineskiplimit
  \normalbaselines\rm		%make definitions take effect

  \if 2\ncolumns
    \let\maxcolumn=b
    \footline{\hss\rm\folio\hss}
    \def\makefootline{\vskip 2in \hsize=6.86in\line{\the\footline}}
  \else \if 3\ncolumns
    \let\maxcolumn=c
    \nopagenumbers
  \else
    \errhelp{You must set \columnsperpage equal to 1, 2, or 3.}
    \errmessage{Illegal number of columns per page}
  \fi\fi

  \intercolumnskip=.46in
  \def\abc{a}
  \output={%
      % This next line is useful when designing the layout.
      %\immediate\write16{Column \folio\abc\space starts with \firstmark}
      \if \maxcolumn\abc \multicolumnformat \global\def\abc{a}
      \else\if a\abc
	\global\setbox\columna\columnbox \global\def\abc{b}
        %% in case we never use \columnb (two-column mode)
        \global\setbox\columnb\hbox to -\intercolumnskip{}
      \else
	\global\setbox\columnb\columnbox \global\def\abc{c}\fi\fi}
  \def\multicolumnformat{\shipout\vbox{\makeheadline
      \hbox{\box\columna\hskip\intercolumnskip
        \box\columnb\hskip\intercolumnskip\columnbox}
      \makefootline}\advancepageno}
  \def\columnbox{\leftline{\pagebody}}

  \def\bye{\par\vfill\supereject
    \if a\abc \else\null\vfill\eject\fi
    \if a\abc \else\null\vfill\eject\fi
    \end}  
\fi

% we won't be using math mode much, so redefine some of the characters
% we might want to talk about
\catcode`\^=12
\catcode`\_=12

\chardef\\=`\\
\chardef\{=`\{
\chardef\}=`\}

\hyphenation{mini-buf-fer}

\parindent 0pt
\parskip 1ex plus .5ex minus .5ex

\def\small{\smallfont\textfont2=\smallsy\baselineskip=.8\baselineskip}

\outer\def\newcolumn{\vfill\eject}

\outer\def\title#1{{\titlefont\centerline{#1}}\vskip 1ex plus .5ex}

\outer\def\section#1{\par\filbreak
  \vskip 3ex plus 2ex minus 2ex {\headingfont #1}\mark{#1}%
  \vskip 2ex plus 1ex minus 1.5ex}

\newdimen\keyindent

\def\beginindentedkeys{\keyindent=1em}
\def\endindentedkeys{\keyindent=0em}
\endindentedkeys

\def\paralign{\vskip\parskip\halign}

\def\<#1>{$\langle${\rm #1}$\rangle$}

\def\type#1{{\tt#1}\null}	%\null so not an abbrev even if period follows

\def\beginexample{\par\leavevmode\begingroup
  \obeylines\obeyspaces\parskip0pt\tt}
{\obeyspaces\global\let =\ }
\def\endexample{\endgroup}

\def\key#1#2{\leavevmode\hbox to \hsize{\vtop
  {\hsize=.75\hsize\rightskip=1em
  \hskip\keyindent\relax#1}\type{#2}\hfil}}

\newbox\metaxbox
\setbox\metaxbox\hbox{\type{M-x}}
\newdimen\metaxwidth
\metaxwidth=\wd\metaxbox

\def\metax#1#2{\leavevmode\hbox to \hsize{\hbox to .75\hsize
  {\hskip\keyindent\relax#1\hfil}%
  \hskip -\metaxwidth minus 1fil
  \type{#2}\hfil}}

\def\threecol#1#2#3{\hskip\keyindent\relax#1\hfil&\type{#2}\quad
  &\type{#3}\quad\cr}

%**end of header


\title{GNU Emacs Reference Card}

\section{Starting Emacs}

To enter emacs, just type: \type{emacs} or \type{emacs filename}

\section{Notation Used In This Reference}

``{\bf\tt C-}'' means hold down the Control key.

``{\bf\tt M-}'' means hold down the Meta key (sometimes labeled ``Alt''
or ``Compose~Character''); if you can't find a Meta key, tap and
release the Escape (ESC) key.

% See the section on files for how to read in a file to edit.

\section{Leaving Emacs}

\key{suspend Emacs (the usual way of leaving it)}{C-x C-z}
\key{exit Emacs permanently}{C-x C-c}

\section{Files}

\key{{\bf read} a file into Emacs}{C-x C-f}
\key{{\bf save} a file back to disk}{C-x C-s}
\key{{\bf insert} contents of another file into this buffer}{C-x i}
\key{replace this file with the file you really want}{C-x C-v}
\key{write buffer to a specified file}{C-x C-w}
\key{run Dired, the directory editor}{C-x d}

\section{Getting Help}

Type \type{C-h} and follow the directions.
If you are a first-time user, type \type{C-h t} for a {\bf tutorial}.
(This card assumes you know the tutorial.).  Sometimes Emacs will
treat \type{Backspace} like \type{C-h}; that's okay, just use
\type{Delete} instead of \type{Backspace}.

\key{get rid of Help window}{C-x 1}
\key{scroll Help window}{M-C-v}
\key{describe the function a key runs}{C-h k}
\key{describe a function by name}{C-h f}
\key{describe the current mode}{C-h m}
\key{help on help}{C-h C-h}

\section{Error Recovery}

\key{{\bf abort} partially typed or executing command}{C-g}
\metax{{\bf recover} a file lost by a system crash}{M-x recover-file}
\key{{\bf undo} an unwanted change}{C-x u {\rm or} C-_}
\metax{restore a buffer to its original contents}{M-x revert-buffer}
\key{redraw garbaged screen}{C-l}

\section{Searching}

\key{incremental search forward}{C-s}
\key{incremental search backward}{C-r}
\key{regular expression search}{M-C-s}

Use \type{C-s} or \type{C-r} again to repeat the search in either direction.

\key{exit incremental search}{RETURN}
\key{undo effect of last character}{DELETE}
\key{abort current search}{C-g}

If Emacs is still searching, \type{C-g} will cancel the
part of the search not done, otherwise it aborts the entire search.

\section{Motion}

Cursor motion:

\beginindentedkeys

\paralign to \hsize{#\tabskip=10pt plus 1 fil&#\tabskip=0pt&#\cr
\threecol{{\bf entity to move over}}{{\bf backward}}{{\bf forward}}
\threecol{character}{C-b}{C-f}
\threecol{word}{M-b}{M-f}
\threecol{line}{C-p}{C-n}
\threecol{go to line beginning (or end)}{C-a}{C-e}
\threecol{s-expression}{M-C-b}{M-C-f}
\threecol{function}{M-C-a}{M-C-e}
\threecol{go to buffer beginning (or end)}{M-<}{M->}

Screen motion:

\key{scroll to next screen}{C-v}
\key{scroll to previous screen}{M-v}

\endindentedkeys

\section{Killing and Deleting}

\paralign to \hsize{#\tabskip=10pt plus 1 fil&#\tabskip=0pt&#\cr
\threecol{{\bf entity to kill}}{{\bf backward}}{{\bf forward}}
\threecol{character (delete, not kill)}{C-h}{C-d}
\threecol{word}{M-C-h}{M-d}
\threecol{line (to end of)}{M-0 C-k}{C-k}
\threecol{sexp}{M-- M-C-k}{M-C-k}
}

\key{kill {\bf region}}{C-w}
\key{kill to next occurrence of {\it char}}{M-z {\it char}}

\key{yank back last thing killed}{C-y}
\key{replace last yank with previous kill}{M-y}

\section{Marking}

\metax{set mark here}{C-@ {\rm or} C-SPC}
\key{set mark {\it arg\/} {\bf words} away}{M-@}
\key{mark {\bf sexp}}{C-z C-e}
\key{exchange point and mark}{C-x C-x}

\section{Query Replace}

\key{interactively replace a text string}{M-\%}
\metax{using regular expressions}{M-x query-replace-regexp}

Valid responses in query-replace mode are

fooo -- is below still accurate?
\key{{\bf replace} this one, go on to next}{SPC}
\key{replace this one, don't move}{,}
\key{{\bf skip} to next without replacing}{DEL {\rm or} RET}
\key{replace all remaining matches}{!}
\key{{\bf back up} to the previous match}{^}
\key{{\bf exit} query-replace}{ESC}
\key{enter recursive edit (\type{M-C-c} to exit)}{C-r}

\section{Multiple Windows}

\key{delete all other windows}{C-x 1}
\key{delete this window}{C-x 0}
\key{split window in 2 vertically}{C-x 2}
\key{split window in 2 horizontally}{C-x 5}

\key{scroll other window}{M-C-v}
\key{switch cursor to another window}{C-x o}

\key{shrink window shorter}{C-x _}
\key{grow window taller}{C-x ^}
\key{shrink window narrower}{C-x \{}
\key{grow window wider}{C-x \}}

\key{select a buffer in other window}{C-z b}
\key{find file in other window}{C-z C-f}
\key{compose mail in other window}{C-z m}
\key{run Dired in other window}{C-z d}
\key{find tag in other window}{C-x 4 .}

\section{Formatting}

\key{indent current {\bf line} (mode-dependent)}{TAB}
\key{indent {\bf region} (mode-dependent)}{M-C-\\}
\key{indent region rigidly {\it arg\/} columns}{C-x TAB}

\key{insert newline after point}{C-o}
\key{move rest of line vertically down}{M-C-o}
\key{delete blank lines around point}{C-x C-o}
\key{delete all white space around point}{M-\\}
\key{put exactly one space at point}{M-SPC}
\key{center current line}{M-s}

\key{fill {\bf paragraph}}{M-q}
\key{fill {\bf region}}{M-g}
\key{set fill column}{C-x f}
\key{set prefix each line starts with}{C-z C-p}

\section{Terminal Emulation}

\key{run {\bf autoseq} command}{C-z a}
\key{run {\bf man} command}{C-z C-m}
\key{run {\bf notes} command}{C-z n}
\key{prompt for machine and {\bf rlogin} to it}{C-z r}
\key{escape from terminal emulator}{C-\\}
\key{exit editor server}{C-x \#}

\section{The Minibuffer}

The following keys are defined in the minibuffer.

\key{complete as much as possible}{TAB}
\key{complete up to one word}{SPC}
\key{complete and execute}{RET}
\key{show possible completions}{?}
\key{abort command}{C-g}

Type \type{C-x ESC} to edit and repeat the last command that used the
minibuffer.  The following keys are then defined.

\key{previous minibuffer command}{M-p}
\key{next minibuffer command}{M-n}

\newcolumn
\title{GNU Emacs Reference Card}

\section{Buffers}

\key{select another buffer}{C-x b}
\key{list all buffers}{C-x C-b}
\key{kill a buffer}{C-x k}
\key{save and kill current buffer}{C-z C-k}

\section{Transposing}

\key{transpose {\bf characters}}{C-t}
\key{transpose {\bf words}}{M-t}
\key{transpose {\bf lines}}{C-x C-t}
\key{transpose {\bf sexps}}{M-C-t}

\section{Spelling Check}

\key{check spelling of current word}{M-\$}
\metax{check spelling of all words in region}{M-x spell-region}
\key{check spelling of entire buffer}{C-z p}

\section{Case Change}

\key{uppercase word}{M-u}
\key{lowercase word}{M-l}
\key{capitalize word}{M-c}

\section{Shells}

\key{execute a shell command}{M-!}
\key{run a shell command on the region}{M-|}
\key{run a shell command on the entire buffer}{C-z |}
\key{filter region through a shell command}{C-u M-|}
\key{start a shell in window \type{*shell*}}{C-x !}
\key{send shell {\it int-char\/} ({\tt C-c{\rm,} C-d{\rm,} C-u {\rm or} C-z})}
{C-c {\it int-char}}

\section{Mail}

\key{invoking the mail reader}{M-x vm}
\key{scroll forward}{SPC}
\key{scroll reverse}{DEL {\rm or} M-v}
\key{{\bf next} non-deleted message}{n}
\key{{\bf previous} non-deleted message}{p}
\key{{\bf delete} message}{d}
\key{{\bf reply} to message}{r}
\key{{\bf reply and quote} original message}{R}
\key{forward message to someone}{z}
\key{follow up to all recipients}{f}
\key{send mail}{m}
\key{{\bf get} newly arrived mail}{g}
\key{{\bf quit} Rmail}{q}
\key{save message in a file}{s}

\section{Reading News}
\metax{invoke Gnus}{M-x gnus}

\section{Regular Expressions}

The following have special meaning inside a regular expression.

\key{any single char}{. {\rm(dot)}}
\key{zero or more repeats}{*}
\key{one or more repeats}{+}
\key{zero or one repeat}{?}
\key{any char in set}{[ {\rm$\ldots$} ]}
\key{any char not in set}{[^ {\rm$\ldots$} ]}
\key{beginning of line}{^}
\key{end of line}{\$}
\key{backslash}{\\\\}
\key{alternative (``or'')}{\\|}
\key{grouping}{\\( {\rm$\ldots$} \\)}
\key{{\it n\/}th group}{\\{\it n}}
\key{beginning of buffer}{\\`}
\key{end of buffer}{\\'}
\key{word break}{\\b}
\key{not beginning or end of word}{\\B}
\key{beginning of word}{\\<}
\key{end of word}{\\>}
\key{any word-syntax char}{\\w}
\key{any non-word-syntax char}{\\W}
\key{char with syntax {\it c}}{\\s{\it c}}
\key{char with syntax not {\it c}}{\\S{\it c}}

%\section{Registers}

%\key{copy region to register}{C-x x}
%\key{copy rectangle to register}{C-z r}
%\key{insert register contents}{C-x g}

%\key{save point in register}{C-x /}
%\key{move point to saved location}{C-x j}

\section{Info}

\key{enter the Info documentation reader}{C-z C-z i}
\beginindentedkeys

Moving within a node:

\key{scroll forward}{SPC}
\key{scroll reverse}{DEL {\rm or} M-v}
\key{beginning of node}{. {\rm (dot)}}

Moving between nodes:

\key{{\bf next} node}{n}
\key{{\bf previous} node}{p}
\key{move {\bf up}}{u}
\key{select menu item by name}{m}
\key{select {\it n\/}th menu item by number (1--5)}{{\it n}}
\key{follow cross reference  (return with \type{l})}{f}
\key{return to last node you saw}{l}
\key{return to directory node}{d}
\key{go to any node by name}{g}

Other:

\key{run Info {\bf tutorial}}{h}
\key{list Info commands}{?}
\key{{\bf quit} Info}{q}
\key{search nodes for regexp}{s}

\endindentedkeys

\section{Keyboard Macros}

\key{{\bf start} defining a keyboard macro}{C-x (}
\key{{\bf end} keyboard macro definition}{C-x )}
\key{{\bf execute} last-defined keyboard macro}{C-x e {\rm or} C-\\}
\key{append to last keyboard macro}{C-u C-x (}
\metax{name last keyboard macro}{M-x name-last-kbd-macro}
\metax{insert lisp definition in buffer}{M-x insert-kbd-macro}

\section{\TeX\ Mode}

\key{run \TeX\ on buffer}{C-c C-b}
\key{print the dvi file made by above command}{C-c C-p}
\key{kill a \TeX\ run}{C-c C-k}
\key{center the \TeX\ run buffer}{C-c C-l}
\key{boldface the previous word}{C-c b}
\key{italicize the previous word}{C-c i}

\section{Scheme Mode}

\key{newline and indent}{RET}
\key{newline}{LFD {\rm or} C-j}
\key{indent definition}{C-c C-i}
\key{indent previous s-expression}{C-c i}
\key{both out (remove delimiters of next list)}{C-c C-b}
\key{send definition and go to Scheme process}{M-C-x}
\key{send buffer to Scheme process}{C-c b}
\key{send current definition to Scheme process}{C-c d}
\key{send preceeding expression to Scheme process}{C-c e}
\key{send region to Scheme process}{C-c r}

\key{repeat last input to Scheme process}{C-c C-h RET}

\section{Miscellaneous}

\key{view file}{C-x {\bf v}}
\key{list directory}{C-x C-d}
\key{\TeX\ mode}{C-z t}
\key{Scheme mode}{C-z c}
\key{run Chez Scheme process}{C-z C-c}
\key{toggle read only mode}{C-z C-t}
\key{blink cursor on matching open delimiter}{C-z o}
\key{up list and blink cursor}{C-z C-u}
\key{insert quoted {\it char\/} (whatever it is)}{C-z q {\it char}}
\key{insert file name with automatic completion}{C-z f}
\key{prompt for string and send it to current process}{C-z C-x}
\key{go to indicated line of buffer}{C-z g}
\key{abort recursive edit}{C-z C-g}

\copyrightnotice

\bye

% Local variables:
% compile-command: "tex emacs-ref.tex"
% End:
