commit/XEmacs: stephen_at_xemacs: Fix no-Mule build.

1 new commit in XEmacs: https://bitbucket.org/xemacs/xemacs/commits/00a421d2b2ba/ Changeset: 00a421d2b2ba User: stephen_at_xemacs Date: 2013-06-21 11:45:06 Summary: Fix no-Mule build. * paragraphs.el (sentence-end): Use octal, not Unicode, escapes. * (sentence-end-base): Use non-ASCII only in Mule. Affected #: 2 files diff -r a2912073be852d27a0589444677b96ad7027f2e3 -r 00a421d2b2ba037982b0eb7b557225abc9b6c4ae lisp/ChangeLog --- a/lisp/ChangeLog +++ b/lisp/ChangeLog ＠＠ -1,3 +1,10 ＠＠ +2013-06-21 Stephen J. Turnbull <stephen(a)xemacs.org&gt; + + Fix no-Mule build. + + * paragraphs.el (sentence-end): Use octal, not Unicode, escapes. + * (sentence-end-base): Use non-ASCII only in Mule. + 2013-06-17 Aidan Kehoe <kehoea(a)parhasard.net&gt; * process.el (process-synchronize-point): Moved to a label. diff -r a2912073be852d27a0589444677b96ad7027f2e3 -r 00a421d2b2ba037982b0eb7b557225abc9b6c4ae lisp/paragraphs.el --- a/lisp/paragraphs.el +++ b/lisp/paragraphs.el ＠＠ -180,7 +180,10 ＠＠ :type '(choice regexp (const :tag "Use default value" nil))) (put 'sentence-end 'safe-local-variable 'string-or-null-p) -(defcustom sentence-end-base "[.?!][]\"'”)}]*" +(defcustom sentence-end-base + (concat "[.?!][]\"'" + (if (featurep 'mule) (unicode-to-char #x201D) "") + ")}]*") "Regexp matching the basic end of a sentence, not including following space." :group 'paragraphs :type 'string ＠＠ -201,14 +204,14 ＠＠ in between. See Info node `(elisp)Standard Regexps'." (or sentence-end ;; We accept non-break space along with space. - (concat (if sentence-end-without-period "\\w[ \u00a0][ \u00a0]\\|") + (concat (if sentence-end-without-period "\\w[ \240][ \240]\\|") "\\(" sentence-end-base (if sentence-end-double-space - "\\($\\|[ \u00a0]$\\|\t\\|[ \u00a0][ \u00a0]\\)" "\\($\\|[\t \u00a0]\\)") + "\\($\\|[ \240]$\\|\t\\|[ \240][ \240]\\)" "\\($\\|[\t \240]\\)") "\\|[" sentence-end-without-space "]+" "\\)" - "[ \u00a0\t\n]*"))) + "[ \240\t\n]*"))) (defcustom page-delimiter "^\014" "*Regexp describing line-beginnings that separate pages." Repository URL: https://bitbucket.org/xemacs/xemacs/ -- This is a commit notification from bitbucket.org. You are receiving this because you have the service enabled, addressing the recipient of this email. _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://lists.xemacs.org/mailman/listinfo/xemacs-patches