21 files changed, 34 insertions, 34 deletions

diff --git a/lisp/allout.el b/lisp/allout.el
index 3695929bce7..8f87eca6666 100644
--- a/lisp/allout.el
+++ b/lisp/allout.el
@@ -455,14 +455,14 @@ and 'outline-distinctive-bullets-string'.")
 (defvar outline-line-boundary-regexp ()
   "Outline-regexp with outline-style beginning-of-line anchor.
 
-(Ie, C-j, *or* C-m, for prefixes of hidden topics).  This is properly
+\(Ie, C-j, *or* C-m, for prefixes of hidden topics).  This is properly
 set when outline-regexp is produced by 'set-outline-regexp', so
 that (match-beginning 2) and (match-end 2) delimit the prefix.")
 (make-variable-buffer-local 'outline-line-boundary-regexp)
 ;;;_   = outline-bob-regexp
 (defvar outline-bob-regexp ()
   "Like outline-line-boundary-regexp, for headers at beginning of buffer.
-(match-beginning 2) and (match-end 2) delimit the prefix.")
+\(match-beginning 2) and (match-end 2) delimit the prefix.")
 (make-variable-buffer-local 'outline-bob-regexp)
 ;;;_   = outline-header-subtraction
 (defvar outline-header-subtraction (1- (length outline-header-prefix))
diff --git a/lisp/calendar/cal-french.el b/lisp/calendar/cal-french.el
index 42b04c64c72..02167c13f18 100644
--- a/lisp/calendar/cal-french.el
+++ b/lisp/calendar/cal-french.el
@@ -104,7 +104,7 @@ Gregorian date Sunday, December 31, 1 BC."
   "Compute the French Revolutionary equivalent for absolute date DATE.
 The result is a list of the form (MONTH DAY YEAR).
 The absolute date is the number of days elapsed since the
-(imaginary) Gregorian date Sunday, December 31, 1 BC."
+\(imaginary) Gregorian date Sunday, December 31, 1 BC."
   (if (< date 654415)
       (list 0 0 0);; pre-French Revolutionary date
     (let* ((approx (/ (- date 654414) 366));; Approximation from below.
diff --git a/lisp/calendar/holidays.el b/lisp/calendar/holidays.el
index 9be849fb72f..2500b60787f 100644
--- a/lisp/calendar/holidays.el
+++ b/lisp/calendar/holidays.el
@@ -209,7 +209,7 @@ STRING)).  Returns nil if it is not visible in the current calendar window."
 (defun holiday-float (month dayname n string &optional day)
   "Holiday on MONTH, DAYNAME (Nth occurrence, Gregorian) called STRING.
 If the Nth DAYNAME in MONTH is visible, the value returned is the list
-(((MONTH DAY year) STRING)).
+\(((MONTH DAY year) STRING)).
 
 If N<0, count backward from the end of MONTH.
 
diff --git a/lisp/complete.el b/lisp/complete.el
index 03709c9a23a..b4e374532a3 100644
--- a/lisp/complete.el
+++ b/lisp/complete.el
@@ -109,7 +109,7 @@ Some arcane rules:  If `]' is in this string it must come first.
 If `^' is in this string it must NOT come first.  If `-' is in this
 string, it must come first or right after `]'.  In other words, if
 S is this string, then `[S]' must be a legal Emacs regular expression
-(not containing character ranges like `a-z').")
+\(not containing character ranges like `a-z').")
 
 
 (defvar PC-first-char 'x
diff --git a/lisp/diary-lib.el b/lisp/diary-lib.el
index f10f22e78c1..177194e88e9 100644
--- a/lisp/diary-lib.el
+++ b/lisp/diary-lib.el
@@ -787,7 +787,7 @@ and XX:XXam or XX:XXpm."
 (defun list-hebrew-diary-entries ()
   "Add any Hebrew date entries from the diary file to `diary-entries-list'.
 Hebrew date diary entries must be prefaced by `hebrew-diary-entry-symbol'
-(normally an `H').  The same diary date forms govern the style of the Hebrew
+\(normally an `H').  The same diary date forms govern the style of the Hebrew
 calendar entries, except that the Hebrew month names must be spelled in full.
 The Hebrew months are numbered from 1 to 13 with Nisan being 1, 12 being
 Adar I and 13 being Adar II; you must use `Adar I' if you want Adar of a
@@ -871,7 +871,7 @@ not be marked in the calendar.  This function is provided for use with the
   "Mark days in the calendar window that have Hebrew date diary entries.
 Each entry in diary-file (or included files) visible in the calendar window
 is marked.  Hebrew date entries are prefaced by a hebrew-diary-entry-symbol
-(normally an `H').  The same diary-date-forms govern the style of the Hebrew
+\(normally an `H').  The same diary-date-forms govern the style of the Hebrew
 calendar entries, except that the Hebrew month names must be spelled in full.
 The Hebrew months are numbered from 1 to 13 with Nisan being 1, 12 being
 Adar I and 13 being Adar II; you must use `Adar I' if you want Adar of a
@@ -1650,7 +1650,7 @@ have 30 days), and has Passover start on Tuesday.")
 (defun list-islamic-diary-entries ()
   "Add any Islamic date entries from the diary file to `diary-entries-list'.
 Islamic date diary entries must be prefaced by an `islamic-diary-entry-symbol'
-(normally an `I').  The same diary date forms govern the style of the Islamic
+\(normally an `I').  The same diary date forms govern the style of the Islamic
 calendar entries, except that the Islamic month names must be spelled in full.
 The Islamic months are numbered from 1 to 12 with Muharram being 1 and 12 being
 Dhu al-Hijjah.  If an Islamic date diary entry begins with a
@@ -1733,7 +1733,7 @@ not be marked in the calendar.  This function is provided for use with the
   "Mark days in the calendar window that have Islamic date diary entries.
 Each entry in diary-file (or included files) visible in the calendar window
 is marked.  Islamic date entries are prefaced by a islamic-diary-entry-symbol
-(normally an `I').  The same diary-date-forms govern the style of the Islamic
+\(normally an `I').  The same diary-date-forms govern the style of the Islamic
 calendar entries, except that the Islamic month names must be spelled in full.
 The Islamic months are numbered from 1 to 12 with Muharram being 1 and 12 being
 Dhu al-Hijjah.  Islamic date diary entries that begin with a
diff --git a/lisp/ediff.el b/lisp/ediff.el
index 013dc7bce9e..c64b359bf3f 100644
--- a/lisp/ediff.el
+++ b/lisp/ediff.el
@@ -978,7 +978,7 @@ Lines that do not match are assumed to be error messages.")
   "A list of killed diffs. 
 A diff is saved here if it is replaced by a diff
 from another buffer.  This alist has the form:
-((num (A . diff) (B . diff)) ...),
+\((num (A . diff) (B . diff)) ...),
 where A or B parts may be missing.")
 
 
diff --git a/lisp/emulation/vip.el b/lisp/emulation/vip.el
index b710df35f66..e343bf71cbb 100644
--- a/lisp/emulation/vip.el
+++ b/lisp/emulation/vip.el
@@ -627,7 +627,7 @@ to vip-d-com for later use by vip-repeat"
 
 (defun vip-repeat (arg)
   "(ARG)  Re-execute last destructive command.  vip-d-com has the form
-(COM ARG CH REG), where COM is the command to be re-executed, ARG is the
+\(COM ARG CH REG), where COM is the command to be re-executed, ARG is the
 argument for COM, CH is a flag for repeat, and REG is optional and if exists
 is the name of the register for COM."
   (interactive "P")
diff --git a/lisp/emulation/ws-mode.el b/lisp/emulation/ws-mode.el
index 26aea825b7f..d0fb619398f 100644
--- a/lisp/emulation/ws-mode.el
+++ b/lisp/emulation/ws-mode.el
@@ -699,7 +699,7 @@ This will only work for errors raised by WordStar mode functions."
 
 (defun ws-kill-bol ()
   "In WordStar mode: Kill to beginning of line 
-(like WordStar, not like Emacs)."
+\(like WordStar, not like Emacs)."
   (interactive)
   (let ((p (point)))
     (beginning-of-line)
diff --git a/lisp/forms.el b/lisp/forms.el
index b86f9bd6448..083eb1cb53f 100644
--- a/lisp/forms.el
+++ b/lisp/forms.el
@@ -2,7 +2,7 @@
 ;;; Copyright (C) 1991, 1993 Free Software Foundation, Inc.
 
 ;; Author: Johan Vromans <jv@nl.net>
-;; Version: $Revision: 2.4 $
+;; Version: $Revision: 2.5 $
 
 ;; This file is part of GNU Emacs.
 
@@ -266,10 +266,10 @@
 (provide 'forms)                        ;;; official
 (provide 'forms-mode)                   ;;; for compatibility
 
-(defconst forms-version (substring "$Revision: 2.4 $" 11 -2)
+(defconst forms-version (substring "$Revision: 2.5 $" 11 -2)
   "The version number of forms-mode (as string).  The complete RCS id is:
 
-  $Id: forms.el,v 2.4 1994/03/28 23:13:07 kwzh Exp kwzh $")
+  $Id: forms.el,v 2.5 1994/05/07 01:52:42 kwzh Exp rms $")
 
 (defvar forms-mode-hooks nil
   "Hook functions to be run upon entering Forms mode.")
@@ -292,7 +292,7 @@
 
 (defvar forms-read-only nil
   "Non-nil means: visit the file in view (read-only) mode.
-(Defaults to the write access on the data file).")
+\(Defaults to the write access on the data file).")
 
 (defvar forms-multi-line "\C-k"
   "If not nil: use this character to separate multi-line fields (default C-k).")
diff --git a/lisp/gnus.el b/lisp/gnus.el
index cd0272da233..b7ad1d37903 100644
--- a/lisp/gnus.el
+++ b/lisp/gnus.el
@@ -142,7 +142,7 @@ given.  Instead, if the first character of the name is `|', the
 contents of the article is piped out to the named program. It is
 possible to save an article in an MH folder as follows:
 
-(setq gnus-author-copy \"|/usr/local/lib/mh/rcvstore +Article\")")
+\(setq gnus-author-copy \"|/usr/local/lib/mh/rcvstore +Article\")")
 
 (defvar gnus-author-copy-saver (function rmail-output)
   "*A function called with a file name to save an author copy to.
diff --git a/lisp/hippie-exp.el b/lisp/hippie-exp.el
index 65317f96a9d..9e7334ab569 100644
--- a/lisp/hippie-exp.el
+++ b/lisp/hippie-exp.el
@@ -191,7 +191,7 @@ If nil, all buffers are searched.")
 (defvar hippie-expand-ignore-buffers '("^ \\*.*\\*$" dired-mode)
   "*A list specifying which buffers not to search (if not current).
 Can contain both regexps matching buffer names (as strings) and major modes
-(as atoms)")
+\(as atoms)")
 
 ;;;###autoload
 (defun hippie-expand (arg)
diff --git a/lisp/imenu.el b/lisp/imenu.el
index 6733fcea807..d208a4568af 100644
--- a/lisp/imenu.el
+++ b/lisp/imenu.el
@@ -108,7 +108,7 @@ Set it to `imenu--sort-by-name' if you want alphabetic sorting.
 
 The function should take two arguments and return T if the first
 element should come before the second.  The arguments are cons cells;
-(NAME . POSITION).  Look at `imenu--sort-by-name' for an example.")
+\(NAME . POSITION).  Look at `imenu--sort-by-name' for an example.")
 
 (defvar imenu-max-items 25
   "*Maximum number of elements in an index mouse-menu.")
@@ -141,7 +141,7 @@ with name concatenation.")
 It should be a function that takes no arguments and returns an index
 of the current buffer as an alist. The elements in the alist look
 like: (INDEX-NAME . INDEX-POSITION). You may also nest index list like
-(INDEX-NAME . INDEX-ALIST).
+\(INDEX-NAME . INDEX-ALIST).
 
 This function is called within a `save-excursion'.
 
diff --git a/lisp/mail/mail-hist.el b/lisp/mail/mail-hist.el
index ffa3003a45c..7cef0dbfac7 100644
--- a/lisp/mail/mail-hist.el
+++ b/lisp/mail/mail-hist.el
@@ -180,7 +180,7 @@ HEADER is a string without the colon."
 (defsubst mail-hist-add-header-contents-to-ring (header &optional contents)
   "Add the contents of HEADER to the header history ring.
 Optional argument CONTENTS is a string which will be the contents
-(instead of whatever's found in the header)."
+\(instead of whatever's found in the header)."
   (let ((ring (cdr (assoc header mail-hist-header-ring-alist))))
     (or ring
         ;; If the ring doesn't exist, we'll have to make it and add it
@@ -251,7 +251,7 @@ its own independent history, as does the body of the message.
 
 Although you can do so, it does not make much sense to call this
 without having called `mail-hist-previous-header' first
-(\\[mail-hist-previous-header]).
+\(\\[mail-hist-previous-header]).
 
 The history only contains the contents of outgoing messages, not
 received mail."
diff --git a/lisp/mail/supercite.el b/lisp/mail/supercite.el
index ad53816a9fb..b9e6f867daf 100644
--- a/lisp/mail/supercite.el
+++ b/lisp/mail/supercite.el
@@ -264,7 +264,7 @@ be used to select the most preferred attribution since it reflects how
 the original author would like to be distinguished.  It should be
 considered bad taste to put any attribution preference key before
 \"x-attribution\" in this list, except perhaps for \"sc-lastchoice\"
-(see below).
+\(see below).
 
 Supercite remembers the last attribution used when reciting an already
 cited paragraph.  This attribution will always be saved with the
diff --git a/lisp/nntp.el b/lisp/nntp.el
index 9ced03a4c53..607febab8ba 100644
--- a/lisp/nntp.el
+++ b/lisp/nntp.el
@@ -54,7 +54,7 @@ If the kanji code of the NNTP server is different from the local kanji
 code, the correct kanji code of the buffer associated with the NNTP
 server must be specified as follows:
 
-(setq nntp-server-hook
+\(setq nntp-server-hook
       (function
        (lambda ()
          ;; Server's Kanji code is EUC (NEmacs hack).
diff --git a/lisp/progmodes/inf-lisp.el b/lisp/progmodes/inf-lisp.el
index 6dc750585dd..4fa4009614a 100644
--- a/lisp/progmodes/inf-lisp.el
+++ b/lisp/progmodes/inf-lisp.el
@@ -69,7 +69,7 @@
   "*What not to save on inferior Lisp's input history.
 Input matching this regexp is not saved on the input history in Inferior Lisp
 mode.  Default is whitespace followed by 0 or 1 single-letter colon-keyword 
-(as in :a, :c, etc.)")
+\(as in :a, :c, etc.)")
 
 (defvar inferior-lisp-mode-map nil)
 (cond ((not inferior-lisp-mode-map)
diff --git a/lisp/progmodes/make-mode.el b/lisp/progmodes/make-mode.el
index eb07bb412d4..13dab564e6b 100644
--- a/lisp/progmodes/make-mode.el
+++ b/lisp/progmodes/make-mode.el
@@ -17,7 +17,7 @@
 
 ;; So, for the meantime, this is not the default mode for makefiles.
 
-;; $Id: makefile.el,v 1.14 1994/04/11 20:40:58 kwzh Exp rms $
+;; $Id: makefile.el,v 1.15 1994/04/22 20:20:49 rms Exp rms $
 
 ;; This file is part of GNU Emacs.
 
@@ -122,7 +122,7 @@ an item has been selected in the browser.")
 
 (defvar makefile-pickup-everything-picks-up-filenames-p nil
   "If non-nil, makefile-pickup-everything also picks up filenames as targets
-(i.e. it calls makefile-find-filenames-as-targets), otherwise filenames are
+\(i.e. it calls makefile-find-filenames-as-targets), otherwise filenames are
 omitted.")
 
 (defvar makefile-cleanup-continuations-p t
@@ -748,7 +748,7 @@ In the browser\'s client buffer, go to (end-of-line), insert a \'\\\'
 character, insert a new blank line, go to that line and indent by one TAB.
 This is most useful in the process of creating continued lines when copying
 large dependencies from the browser to the client buffer.
-(point) advances accordingly in the client buffer."
+\(point) advances accordingly in the client buffer."
   (interactive)
   (save-excursion
     (set-buffer makefile-browser-client)
diff --git a/lisp/progmodes/simula.el b/lisp/progmodes/simula.el
index 82c5b87401a..52357f7aaf1 100644
--- a/lisp/progmodes/simula.el
+++ b/lisp/progmodes/simula.el
@@ -74,12 +74,12 @@ and the cdr extra OTHERWISE indentation.")
 (defconst simula-abbrev-keyword 'upcase
   "*Specify how to convert case for SIMULA keywords.
 Value is one of the symbols `upcase', `downcase', `capitalize',
-(as in) `abbrev-table' or nil if they should not be changed.")
+\(as in) `abbrev-table' or nil if they should not be changed.")
 
 (defconst simula-abbrev-stdproc 'abbrev-table
   "*Specify how to convert case for standard SIMULA procedure and class names.
 Value is one of the symbols `upcase', `downcase', `capitalize',
-(as in) `abbrev-table', or nil if they should not be changed.")
+\(as in) `abbrev-table', or nil if they should not be changed.")
 
 (defvar simula-abbrev-file nil
   "*File with extra abbrev definitions for use in SIMULA mode.
diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index e9ad45c4488..08141175fe0 100644
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -205,7 +205,7 @@
 This is done before the user's startup file is loaded.  They are copied to
 x-invocation args from which the X-related things are extracted, first
 the switch (e.g., \"-fg\") in the following code, and possible values
-(e.g., \"black\") in the option handler code (e.g., x-handle-switch).
+\(e.g., \"black\") in the option handler code (e.g., x-handle-switch).
 This returns ARGS with the arguments that have been processed removed."
   (setq x-invocation-args args
         args nil)
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 7b3f71cff2e..73b58f68de5 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -682,7 +682,7 @@ Currently the only other valid parser is 'tex.
 
 You can set this variable in hooks in your init file -- eg:
 
-(add-hook 'tex-mode-hook (function (lambda () (setq ispell-parser 'tex))))")
+\(add-hook 'tex-mode-hook (function (lambda () (setq ispell-parser 'tex))))")
 
 (defvar ispell-region-end (make-marker)
   "Marker that allows spelling continuations.")
diff --git a/lisp/textmodes/refbib.el b/lisp/textmodes/refbib.el
index d8344df54d9..c0a62a0610a 100644
--- a/lisp/textmodes/refbib.el
+++ b/lisp/textmodes/refbib.el
@@ -72,7 +72,7 @@ may be eliminated if is exactly the same as the car.
 for the journal name should be listed as beginning with a capital 
 letter, even if it really doesn't.
   For example, a value of '((\"Aij\" \"{Artificial Intelligence}\")
-(\"Ijcai81\" \"ijcai7\")) would expand Aij to the text string
+\(\"Ijcai81\" \"ijcai7\")) would expand Aij to the text string
 \"Artificial Intelligence\", but would replace Ijcai81 with the 
 BibTeX macro \"ijcai7\".")
 
@@ -87,7 +87,7 @@ may be eliminated if is exactly the same as the car.
   Because titles are capitalized before matching, the abbreviated title
 should be listed as beginning with a capital letter, even if it doesn't.
   For example, a value of '((\"Aij\" \"{Artificial Intelligence}\")
-(\"Ijcai81\" \"ijcai7\")) would expand Aij to the text string
+\(\"Ijcai81\" \"ijcai7\")) would expand Aij to the text string
 \"Artificial Intelligence\", but would replace Ijcai81 with the 
 BibTeX macro \"ijcai7\".")