mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

* lisp/textmodes/sgml-mode.el (sgml-fill-nobreak): Give it a doc. (Bug#5326)

Browse Source
This commit is contained in:
Kevin Ryde 2011-03-05 18:30:44 -08:00 committed by Glenn Morris
parent aa248733c5
commit 14369ab313
2 changed files with 10 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/ChangeLog
View File

@ -1,3 +1,7 @@
2011-03-06 Kevin Ryde <user42@zip.com.au>
* textmodes/sgml-mode.el (sgml-fill-nobreak): Give it a doc. (Bug#5326)
2011-03-06 Michael Shields <shields@msrl.com> (tiny change)
* window.el (one-window-p, walk-windows, display-buffer):

7
lisp/textmodes/sgml-mode.el
View File

@ -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_")))