emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: 3 dots vanish at end of filled line


From: Juri Linkov
Subject: Re: 3 dots vanish at end of filled line
Date: Thu, 20 Oct 2005 14:11:14 +0300
User-agent: Gnus/5.110004 (No Gnus v0.4) Emacs/22.0.50 (gnu/linux)

> In Texinfo mode, it should also treat any use of @enddots{}
> as the end of a sentence.  Can someone try to set that up?

The following patch does that:

Index: lisp/textmodes/texinfo.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/textmodes/texinfo.el,v
retrieving revision 1.111
diff -c -r1.111 texinfo.el
*** lisp/textmodes/texinfo.el   31 Aug 2005 10:32:55 -0000      1.111
--- lisp/textmodes/texinfo.el   20 Oct 2005 09:08:10 -0000
***************
*** 593,598 ****
--- 593,608 ----
        (concat "\b\\|@[a-zA-Z]*[ \n]\\|" paragraph-separate))
    (make-local-variable 'paragraph-start)
    (setq paragraph-start (concat "\b\\|@[a-zA-Z]*[ \n]\\|" paragraph-start))
+   ;; Append a copy of `sentence-end' where [.?!] is replaced with @(end)dots{}
+   ;; to the default value of `sentence-end'.
+   (make-local-variable 'sentence-end)
+   (setq sentence-end (concat (sentence-end) "\\|"
+                            (if sentence-end-without-period "\\w  \\|")
+                            "\\(@\\(end\\)?dots{}[]\"'\xd0c9\x5397d)}]*"
+                            (if sentence-end-double-space
+                                "\\($\\| $\\|\t\\|  \\)" "\\($\\|[\t ]\\)")
+                            "\\|[" sentence-end-without-space "]+\\)"
+                            "[ \t\n]*"))
    (make-local-variable 'adaptive-fill-mode)
    (setq adaptive-fill-mode nil)
    (make-local-variable 'fill-column)

-- 
Juri Linkov
http://www.jurta.org/emacs/





reply via email to

[Prev in Thread] Current Thread [Next in Thread]