diff options
| author | Roland McGrath | 1991-05-11 18:07:11 +0000 |
|---|---|---|
| committer | Roland McGrath | 1991-05-11 18:07:11 +0000 |
| commit | 77176e738857197923e3083803d0eff7a8b0dfd6 (patch) | |
| tree | 4ee83e653660377f1a5669e6c9f35006e8dae005 | |
| parent | 483e630e5dfea92edb1413bb95a8001c94ffe43a (diff) | |
| download | emacs-77176e738857197923e3083803d0eff7a8b0dfd6.tar.gz emacs-77176e738857197923e3083803d0eff7a8b0dfd6.zip | |
*** empty log message ***
| -rw-r--r-- | lisp/replace.el | 5 | ||||
| -rw-r--r-- | lisp/reposition.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/paragraphs.el | 23 |
3 files changed, 25 insertions, 5 deletions
diff --git a/lisp/replace.el b/lisp/replace.el index b1aab56bbe9..c32abcefc06 100644 --- a/lisp/replace.el +++ b/lisp/replace.el | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | ;; Replace commands for Emacs. | 1 | ;; Replace commands for Emacs. |
| 2 | ;; Copyright (C) 1985, 1986 Free Software Foundation, Inc. | 2 | ;; Copyright (C) 1985-1991 Free Software Foundation, Inc. |
| 3 | 3 | ||
| 4 | ;; This file is part of GNU Emacs. | 4 | ;; This file is part of GNU Emacs. |
| 5 | 5 | ||
| @@ -18,6 +18,9 @@ | |||
| 18 | ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | 18 | ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. |
| 19 | 19 | ||
| 20 | 20 | ||
| 21 | ;;;###autoload (defconst case-replace t "\ | ||
| 22 | ;;;###autoload *Non-nil means query-replace should preserve case in replacements.") | ||
| 23 | |||
| 21 | ;;;###autoload | 24 | ;;;###autoload |
| 22 | (defun query-replace (from-string to-string &optional arg) | 25 | (defun query-replace (from-string to-string &optional arg) |
| 23 | "Replace some occurrences of FROM-STRING with TO-STRING. | 26 | "Replace some occurrences of FROM-STRING with TO-STRING. |
diff --git a/lisp/reposition.el b/lisp/reposition.el index 5802e6d86fe..dcf7b457b75 100644 --- a/lisp/reposition.el +++ b/lisp/reposition.el | |||
| @@ -161,6 +161,8 @@ first comment line visible (if point is in a comment)." | |||
| 161 | ;;(repos-debug-macro "4") | 161 | ;;(repos-debug-macro "4") |
| 162 | )))) | 162 | )))) |
| 163 | 163 | ||
| 164 | ;;;###autoload (define-key esc-map "\C-l" 'resposition-window) | ||
| 165 | |||
| 164 | ;;; Auxiliary functions | 166 | ;;; Auxiliary functions |
| 165 | 167 | ||
| 166 | ;; Return number of screen lines between START and END. | 168 | ;; Return number of screen lines between START and END. |
diff --git a/lisp/textmodes/paragraphs.el b/lisp/textmodes/paragraphs.el index 748a08e986a..4241c43e7b1 100644 --- a/lisp/textmodes/paragraphs.el +++ b/lisp/textmodes/paragraphs.el | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | ;; Paragraph and sentence parsing. | 1 | ;; Paragraph and sentence parsing. |
| 2 | ;; Copyright (C) 1985 Free Software Foundation, Inc. | 2 | ;; Copyright (C) 1985-1991 Free Software Foundation, Inc. |
| 3 | 3 | ||
| 4 | ;; This file is part of GNU Emacs. | 4 | ;; This file is part of GNU Emacs. |
| 5 | 5 | ||
| @@ -18,9 +18,24 @@ | |||
| 18 | ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. | 18 | ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. |
| 19 | 19 | ||
| 20 | 20 | ||
| 21 | (defvar paragraph-ignore-fill-prefix nil | 21 | ;;;###autoload (defconst paragraph-start "^[ \t\n\f]" |
| 22 | "Non-nil means the paragraph commands are not affected by `fill-prefix'. | 22 | ;;;###autoload "*Regexp for beginning of a line that starts OR separates paragraphs.") |
| 23 | This is desirable in modes where blank lines are the paragraph delimiters.") | 23 | |
| 24 | ;;;###autoload (defconst paragraph-separate "^[ \t\f]*$" | ||
| 25 | ;;;###autoload "*Regexp for beginning of a line that separates paragraphs. | ||
| 26 | ;;;###autoload If you change this, you may have to change paragraph-start also.") | ||
| 27 | |||
| 28 | ;;;###autoload (defconst sentence-end (purecopy "[.?!][]\"')}]*\\($\\| $\\|\t\\| \\)[ \t\n]*") "\ | ||
| 29 | ;;;###autoload *Regexp describing the end of a sentence. | ||
| 30 | ;;;###autoload All paragraph boundaries also end sentences, regardless.") | ||
| 31 | |||
| 32 | ;;;###autoload (defconst page-delimiter "^\014" "\ | ||
| 33 | ;;;###autoload *Regexp describing line-beginnings that separate pages.") | ||
| 34 | |||
| 35 | ;;;###autoload (defvar paragraph-ignore-fill-prefix nil | ||
| 36 | ;;;###autoload "Non-nil means the paragraph commands are not affected by `fill-prefix'. | ||
| 37 | ;;;###autoload This is desirable in modes where blank lines are the paragraph delimiters.") | ||
| 38 | |||
| 24 | 39 | ||
| 25 | (defun forward-paragraph (&optional arg) | 40 | (defun forward-paragraph (&optional arg) |
| 26 | "Move forward to end of paragraph. | 41 | "Move forward to end of paragraph. |