From: "Richard M. Stallman" <rms@gnu.org>
Cc: bob@rattlesnake.com, karl@freefriends.org, emacs-devel@gnu.org
Subject: Re: 3 dots vanish at end of filled line
Date: Thu, 20 Oct 2005 19:38:28 -0400 [thread overview]
Message-ID: <E1ESjzQ-0004a0-0r@fencepost.gnu.org> (raw)
In-Reply-To: <878xwoft8t.fsf@jurta.org> (message from Juri Linkov on Thu, 20 Oct 2005 14:11:14 +0300)
I think this is a cleaner way to implement what Texinfo mode needs.
Does it work?
*** paragraphs.el 06 Aug 2005 14:38:37 -0400 1.79
--- paragraphs.el 20 Oct 2005 18:52:37 -0400
***************
*** 159,178 ****
:group 'paragraphs
:type '(choice regexp (const :tag "Use default value" nil)))
(defun sentence-end ()
"Return the regexp describing the end of a sentence.
This function returns either the value of the variable `sentence-end'
if it is non-nil, or the default value constructed from the
! variables `sentence-end-double-space', `sentence-end-without-period'
! and `sentence-end-without-space'. The default value specifies
! that in order to be recognized as the end of a sentence, the
! ending period, question mark, or exclamation point must be
! followed by two spaces, unless it's inside some sort of quotes or
! parenthesis. See Info node `(elisp)Standard Regexps'."
(or sentence-end
(concat (if sentence-end-without-period "\\w \\|")
! "\\([.?!][]\"'\xd0c9\x5397d)}]*"
(if sentence-end-double-space
"\\($\\| $\\|\t\\| \\)" "\\($\\|[\t ]\\)")
"\\|[" sentence-end-without-space "]+\\)"
--- 159,185 ----
:group 'paragraphs
:type '(choice regexp (const :tag "Use default value" nil)))
+ (defcustom sentence-end-base "\\([.?!][]\"'\xd0c9\x5397d)}]*"
+ "*Regexp matching the basic end of a sentence, not including following space."
+ :group 'paragraphs
+ :type 'string
+ :version "22.1")
+
(defun sentence-end ()
"Return the regexp describing the end of a sentence.
This function returns either the value of the variable `sentence-end'
if it is non-nil, or the default value constructed from the
! variables `sentence-end-base', `sentence-end-double-space',
! `sentence-end-without-period' and `sentence-end-without-space'.
!
! The default value specifies that in order to be recognized as the
! end of a sentence, the ending period, question mark, or exclamation point
! must be followed by two spaces, with perhaps some closing delimiters
! in between. See Infonode `(elisp)Standard Regexps'."
(or sentence-end
(concat (if sentence-end-without-period "\\w \\|")
! sentence-end-base
(if sentence-end-double-space
"\\($\\| $\\|\t\\| \\)" "\\($\\|[\t ]\\)")
"\\|[" sentence-end-without-space "]+\\)"
*** texinfo.el 01 Sep 2005 01:53:14 -0400 1.111
--- texinfo.el 20 Oct 2005 18:54:35 -0400
***************
*** 593,598 ****
--- 593,601 ----
(concat "\b\\|@[a-zA-Z]*[ \n]\\|" paragraph-separate))
(make-local-variable 'paragraph-start)
(setq paragraph-start (concat "\b\\|@[a-zA-Z]*[ \n]\\|" paragraph-start))
+ (make-local-variable 'sentence-end-base)
+ (setq sentence-end-base
+ "\\(\\(@\\(end\\)?dots{}\\|[.?!]\\)[]\"'\xd0c9\x5397d)}]*"
(make-local-variable 'adaptive-fill-mode)
(setq adaptive-fill-mode nil)
(make-local-variable 'fill-column)
next prev parent reply other threads:[~2005-10-20 23:38 UTC|newest]
Thread overview: 41+ messages / expand[flat|nested] mbox.gz Atom feed top
2005-10-07 20:32 3 dots vanish at end of filled line Karl Berry
2005-10-07 21:12 ` Juri Linkov
2005-10-07 21:21 ` Karl Berry
2005-10-07 21:47 ` Juri Linkov
2005-10-07 23:12 ` Karl Berry
2005-10-07 23:56 ` Luc Teirlinck
2005-10-08 2:54 ` Luc Teirlinck
2005-10-08 22:57 ` Richard M. Stallman
2005-10-09 0:14 ` Karl Berry
2005-10-09 0:57 ` Luc Teirlinck
2005-10-09 6:11 ` Juri Linkov
2005-10-09 17:17 ` Karl Berry
2005-10-09 19:16 ` Luc Teirlinck
2005-10-10 15:00 ` Stefan Monnier
2005-10-10 17:07 ` Karl Berry
2005-10-10 18:01 ` Stefan Monnier
2005-10-11 14:46 ` Richard M. Stallman
2005-10-11 17:06 ` Stefan Monnier
2005-10-10 23:48 ` Richard M. Stallman
2005-10-10 23:48 ` Richard M. Stallman
2005-10-11 2:18 ` Luc Teirlinck
2005-10-11 3:31 ` Luc Teirlinck
2005-10-11 22:42 ` Richard M. Stallman
2005-10-12 0:21 ` Luc Teirlinck
2005-10-12 19:47 ` Stefan Monnier
2005-10-13 20:10 ` Richard M. Stallman
2005-10-28 4:41 ` KOBAYASHI Yasuhiro
2005-10-10 6:18 ` Juri Linkov
2005-10-09 19:54 ` Luc Teirlinck
2005-10-10 4:14 ` Richard M. Stallman
2005-10-10 15:02 ` Stefan Monnier
2005-10-10 23:47 ` Richard M. Stallman
2005-10-09 11:09 ` Robert J. Chassell
2005-10-10 4:14 ` Richard M. Stallman
2005-10-10 12:21 ` Robert J. Chassell
2005-10-10 23:47 ` Richard M. Stallman
2005-10-11 12:57 ` Robert J. Chassell
2005-10-20 11:11 ` Juri Linkov
2005-10-20 23:38 ` Richard M. Stallman [this message]
2005-10-21 11:55 ` Juri Linkov
2005-10-21 22:19 ` Richard M. Stallman
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=E1ESjzQ-0004a0-0r@fencepost.gnu.org \
--to=rms@gnu.org \
--cc=bob@rattlesnake.com \
--cc=emacs-devel@gnu.org \
--cc=karl@freefriends.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).