;ELC   
;;; compiled by kwzh@hal.gnu.ai.mit.edu on Mon Apr 17 19:53:34 1995
;;; from file /gd/gnu/emacs/19.0/lisp/text-mode.el
;;; emacs version 19.28.90.26.
;;; bytecomp version FSF 2.10
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19")))
    (error "`/gd/gnu/emacs/19.0/lisp/text-mode.el' was compiled for Emacs 19"))


#@39 Syntax table used while in text mode.
(defvar text-mode-syntax-table nil (#$ . 487))
#@39 Abbrev table used while in text mode.
(defvar text-mode-abbrev-table nil (#$ . 578))
(byte-code "ÀÁÂ\"ˆ„ Ä ÅÆÇ#ˆÅÈÇ#ˆÅÉÊ#ˆÂ‡" [define-abbrev-table text-mode-abbrev-table nil text-mode-syntax-table make-syntax-table modify-syntax-entry 34 ".   " 92 39 "w   "] 4)
#@143 Keymap for Text mode.
Many other modes, such as Mail mode, Outline mode and Indented Text mode,
inherit all the commands defined in this map.
(defvar text-mode-map nil (#$ . 853))
(byte-code "„ Á ÂÃÄ#ˆÂÅÆ#ˆÂÇÈ#ˆÂÉÊ#ˆÁ‡" [text-mode-map make-sparse-keymap define-key "	" ispell-complete-word "	" tab-to-tab-stop "s" center-line "S" center-paragraph] 4)
#@190 Major mode for editing text intended for humans to read.
Special commands:
\{text-mode-map}
Turning on Text mode calls the value of the variable `text-mode-hook',
if that value is non-nil.
(defalias 'text-mode #[nil "À ˆÁ\n!ˆÃÅÉ\n!ˆËÌ!‡" [kill-all-local-variables use-local-map text-mode-map "Text" mode-name text-mode major-mode text-mode-abbrev-table local-abbrev-table set-syntax-table text-mode-syntax-table run-hooks text-mode-hook] 2 (#$ . 1221) nil])
#@103 Keymap for Indented Text mode.
All the commands defined in Text mode are inherited unless overridden.
(defvar indented-text-mode-map nil (#$ . 1694))
(byte-code "„ Á Ã\nÄÅ#ˆ\n¤)Á‡" [indented-text-mode-map make-sparse-keymap newmap define-key "	" indent-relative text-mode-map] 4)
#@340 Major mode for editing text with indented paragraphs.
In this mode, paragraphs are delimited only by blank lines.
You can thus get the benefit of adaptive filling
 (see the variable `adaptive-fill-mode').
\{indented-text-mode-map}
Turning on `indented-text-mode' calls the value of the variable
`text-mode-hook', if that value is non-nil.
(defalias 'indented-text-mode #[nil "À ˆÁ\n!ˆÃÄÅ\"ˆ\fÇ!ˆÉÊ!ˆË\nÉÌ!ˆÍP\fÉÏ!ˆ\fÁ!ˆÑÓÕÖ×\"‡" [kill-all-local-variables use-local-map text-mode-map define-abbrev-table text-mode-abbrev-table nil local-abbrev-table set-syntax-table text-mode-syntax-table make-local-variable indent-line-function indent-relative-maybe paragraph-start "$\\|" page-delimiter paragraph-separate indented-text-mode-map "Indented Text" mode-name indented-text-mode major-mode run-hooks text-mode-hook indented-text-mode-hook] 3 (#$ . 1987) nil])
#@96 Center each nonblank line in the paragraph at or after point.
See `center-line' for more info.
(defalias 'center-paragraph #[nil "ŠÀ ˆn„\f ÁÂ!ˆ`Ä ˆÅ`\"*‡" [forward-paragraph newline 1 end backward-paragraph center-region] 3 (#$ . 2868) nil])
#@84 Center each nonblank line starting in the region.
See `center-line' for more info.
(defalias 'center-region #[(from to) "	Vƒ 	\n)ŠŒ	}ˆbˆm?…. ŠÃÄwˆl)„( Å ˆÆyˆ‚ *‡" [from to tem " 	" nil center-line 1] 2 (#$ . 3118) "r"])
#@190 Center the line point is on, within the width specified by `fill-column'.
This means adjusting the indentation so that it equals
the distance between the end of the text and `fill-column'.
(defalias 'center-line #[nil "ŠÀ ÁÄyˆÅ ˆÁˆÅ ˆiÆZ\nZÈ¥\\!+‡" [current-left-margin nil line-length lm 0 delete-horizontal-space indent-line-to fill-column 2] 4 (#$ . 3354) nil])