Mercurial > emacs
changeset 264:7db4ff4204a5
*** empty log message ***
| author | Roland McGrath <roland@gnu.org> |
|---|---|
| date | Sat, 11 May 1991 18:07:11 +0000 |
| parents | 57bcc096ab9c |
| children | 8df170a4c9d1 |
| files | lisp/replace.el lisp/reposition.el lisp/textmodes/paragraphs.el |
| diffstat | 3 files changed, 25 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/replace.el Sat May 11 18:02:10 1991 +0000 +++ b/lisp/replace.el Sat May 11 18:07:11 1991 +0000 @@ -1,5 +1,5 @@ ;; Replace commands for Emacs. -;; Copyright (C) 1985, 1986 Free Software Foundation, Inc. +;; Copyright (C) 1985-1991 Free Software Foundation, Inc. ;; This file is part of GNU Emacs. @@ -18,6 +18,9 @@ ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. +;;;###autoload (defconst case-replace t "\ +;;;###autoload *Non-nil means query-replace should preserve case in replacements.") + ;;;###autoload (defun query-replace (from-string to-string &optional arg) "Replace some occurrences of FROM-STRING with TO-STRING.
--- a/lisp/reposition.el Sat May 11 18:02:10 1991 +0000 +++ b/lisp/reposition.el Sat May 11 18:07:11 1991 +0000 @@ -161,6 +161,8 @@ ;;(repos-debug-macro "4") )))) +;;;###autoload (define-key esc-map "\C-l" 'resposition-window) + ;;; Auxiliary functions ;; Return number of screen lines between START and END.
--- a/lisp/textmodes/paragraphs.el Sat May 11 18:02:10 1991 +0000 +++ b/lisp/textmodes/paragraphs.el Sat May 11 18:07:11 1991 +0000 @@ -1,5 +1,5 @@ ;; Paragraph and sentence parsing. -;; Copyright (C) 1985 Free Software Foundation, Inc. +;; Copyright (C) 1985-1991 Free Software Foundation, Inc. ;; This file is part of GNU Emacs. @@ -18,9 +18,24 @@ ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. -(defvar paragraph-ignore-fill-prefix nil - "Non-nil means the paragraph commands are not affected by `fill-prefix'. -This is desirable in modes where blank lines are the paragraph delimiters.") +;;;###autoload (defconst paragraph-start "^[ \t\n\f]" +;;;###autoload "*Regexp for beginning of a line that starts OR separates paragraphs.") + +;;;###autoload (defconst paragraph-separate "^[ \t\f]*$" +;;;###autoload "*Regexp for beginning of a line that separates paragraphs. +;;;###autoload If you change this, you may have to change paragraph-start also.") + +;;;###autoload (defconst sentence-end (purecopy "[.?!][]\"')}]*\\($\\| $\\|\t\\| \\)[ \t\n]*") "\ +;;;###autoload *Regexp describing the end of a sentence. +;;;###autoload All paragraph boundaries also end sentences, regardless.") + +;;;###autoload (defconst page-delimiter "^\014" "\ +;;;###autoload *Regexp describing line-beginnings that separate pages.") + +;;;###autoload (defvar paragraph-ignore-fill-prefix nil +;;;###autoload "Non-nil means the paragraph commands are not affected by `fill-prefix'. +;;;###autoload This is desirable in modes where blank lines are the paragraph delimiters.") + (defun forward-paragraph (&optional arg) "Move forward to end of paragraph.