aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMichal Nazarewicz2014-10-27 17:14:38 +0100
committerMichal Nazarewicz2015-01-20 14:38:38 +0100
commit11e161f54de5009c4ccba3a3d7bcc86850d5b2b2 (patch)
tree63d9d9218c0e0f8a8773fede82c45afd08461fad
parent6ffb560b2a940d19419ac5afe11418588ef8c61f (diff)
downloademacs-11e161f54de5009c4ccba3a3d7bcc86850d5b2b2.tar.gz
emacs-11e161f54de5009c4ccba3a3d7bcc86850d5b2b2.zip
paragraphs: recognise more Unicode characters as end of sentence
* lisp/textmodes/paragraphs.el (sentence-end-base): Include an ellipsis (…) and interrobang (‽) characters as end of a sentence, and a closing single quote (’) as an end of a quote.
-rw-r--r--lisp/ChangeLog6
-rw-r--r--lisp/textmodes/paragraphs.el2
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 35b08b0f1de..d3bfafdf721 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,11 @@
12015-01-20 Michal Nazarewicz <mina86@mina86.com> 12015-01-20 Michal Nazarewicz <mina86@mina86.com>
2 2
3 * textmodes/paragraphs.el (sentence-end-base): Include an
4 ellipsis (…) and interrobang (‽) characters as end of a sentence,
5 and a closing single quote (’) as an end of a quote.
6
72015-01-20 Michal Nazarewicz <mina86@mina86.com>
8
3 * textmodes/tildify.el (tildify-double-space-undos): A new 9 * textmodes/tildify.el (tildify-double-space-undos): A new
4 variable specifying whether pressing space in `tildify-mode' after 10 variable specifying whether pressing space in `tildify-mode' after
5 a space has been replaced with hard space undos the substitution. 11 a space has been replaced with hard space undos the substitution.
diff --git a/lisp/textmodes/paragraphs.el b/lisp/textmodes/paragraphs.el
index b18a93cd3e6..09451a6b197 100644
--- a/lisp/textmodes/paragraphs.el
+++ b/lisp/textmodes/paragraphs.el
@@ -168,7 +168,7 @@ to obtain the value of this variable."
168 :type '(choice regexp (const :tag "Use default value" nil))) 168 :type '(choice regexp (const :tag "Use default value" nil)))
169(put 'sentence-end 'safe-local-variable 'string-or-null-p) 169(put 'sentence-end 'safe-local-variable 'string-or-null-p)
170 170
171(defcustom sentence-end-base "[.?!][]\"'”)}]*" 171(defcustom sentence-end-base "[.?!…‽][]\"'”)}]*"
172 "Regexp matching the basic end of a sentence, not including following space." 172 "Regexp matching the basic end of a sentence, not including following space."
173 :group 'paragraphs 173 :group 'paragraphs
174 :type 'string 174 :type 'string