mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

*** empty log message ***

Browse Source
This commit is contained in:
Roland McGrath 1991-05-11 18:07:11 +00:00
parent 483e630e5d
commit 77176e7388
3 changed files with 25 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/replace.el
View File

@ -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.

2
lisp/reposition.el
View File

@ -161,6 +161,8 @@ first comment line visible (if point is in a comment)."
;;(repos-debug-macro "4")
))))
;;;###autoload (define-key esc-map "\C-l" 'resposition-window)
;;; Auxiliary functions
;; Return number of screen lines between START and END.

23
lisp/textmodes/paragraphs.el
View File

@ -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.