[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#5326: 23.1; sgml-fill-nobreak docstring
From: |
Kevin Ryde |
Subject: |
bug#5326: 23.1; sgml-fill-nobreak docstring |
Date: |
Wed, 06 Jan 2010 10:18:44 +1100 |
User-agent: |
Gnus/5.110011 (No Gnus v0.11) Emacs/23.1 (gnu/linux) |
sgml-fill-nobreak might helpfully have a docstring to tell you want its
nobreaking condition is. I don't think it would show up in customize or
anything as such, but C-h v fill-nobreak-predicate in sgml-mode shows it
and you can follow it from there to see what it does.
2010-01-05 Kevin Ryde <user42@zip.com.au>
* textmodes/sgml-mode.el (sgml-fill-nobreak): Turn comment into
docstring.
--- sgml-mode.el.~1.146.~ 2009-12-06 10:10:20.000000000 +1100
+++ sgml-mode.el 2010-01-03 16:33:19.000000000 +1100
@@ -1,7 +1,7 @@
;;; sgml-mode.el --- SGML- and HTML-editing modes -*- coding: utf-8 -*-
;; Copyright (C) 1992, 1995, 1996, 1998, 2001, 2002, 2003, 2004,
-;; 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+;; 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
;; Author: James Clark <jjc@jclark.com>
;; Maintainer: FSF
@@ -417,7 +417,12 @@
(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_")))
In GNU Emacs 23.1.1 (i486-pc-linux-gnu, GTK+ Version 2.16.5)
of 2009-09-14 on raven, modified by Debian
configured using `configure '--build=i486-linux-gnu' '--host=i486-linux-gnu'
'--prefix=/usr' '--sharedstatedir=/var/lib' '--libexecdir=/usr/lib'
'--localstatedir=/var/lib' '--infodir=/usr/share/info'
'--mandir=/usr/share/man' '--with-pop=yes'
'--enable-locallisppath=/etc/emacs23:/etc/emacs:/usr/local/share/emacs/23.1/site-lisp:/usr/local/share/emacs/site-lisp:/usr/share/emacs/23.1/site-lisp:/usr/share/emacs/site-lisp:/usr/share/emacs/23.1/leim'
'--with-x=yes' '--with-x-toolkit=gtk' '--with-toolkit-scroll-bars'
'build_alias=i486-linux-gnu' 'host_alias=i486-linux-gnu' 'CFLAGS=-DDEBIAN -g
-O2' 'LDFLAGS=-g' 'CPPFLAGS=''
- bug#5326: 23.1; sgml-fill-nobreak docstring,
Kevin Ryde <=