diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-03-06 16:22:16 -0500 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-03-06 16:22:16 -0500 |
commit | 0d6459dfb52188481bfd6bb53f1b2f653ecd6a5d (patch) | |
tree | 306b87fc2903ad23343f3c84be1cccfa72e5a97e /lisp/textmodes/sgml-mode.el | |
parent | 798cb64441228d473f7bdd213183c70fb582595c (diff) | |
parent | 892777baa1739fa5f1f2d1c2975488c3e6f57bae (diff) | |
download | emacs-0d6459dfb52188481bfd6bb53f1b2f653ecd6a5d.tar.gz |
Merge from trunk
Diffstat (limited to 'lisp/textmodes/sgml-mode.el')
-rw-r--r-- | lisp/textmodes/sgml-mode.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/textmodes/sgml-mode.el b/lisp/textmodes/sgml-mode.el index 2229dc6c9e8..314fbf9671b 100644 --- a/lisp/textmodes/sgml-mode.el +++ b/lisp/textmodes/sgml-mode.el @@ -427,7 +427,12 @@ a DOCTYPE or an XML declaration." (format-mode-line mode-name)))))) (defun sgml-fill-nobreak () - ;; Don't break between a tag name and its first argument. + "Don't break between a tag name and its first argument. +This function is designed for use in `fill-nobreak-predicate'. + + <a href=\"some://where\" type=\"text/plain\"> + ^ ^ + | no break here | but still allowed here" (save-excursion (skip-chars-backward " \t") (and (not (zerop (skip-syntax-backward "w_"))) |