Re: JadeTeX and keep-with-next?

[apharris@xxxxxxxxxxxxxxxxxxx (Adam P. Harris)]

Thomas Corte <thomas@xxxxxxxxxxxxxxxxxx> writes:
> it seems that many members of this list use JadeTeX on a regular
> basis. I wonder if somebody has found a solution or workaround
> for the essentially non-functional support of the keep-with-next?
> characteristic (the penalties present in jadetex.dtx don't seem to have
> the desired effect). It really drives me nuts seeing a heading
> as the last thing on the bottom of a page :)

Funny, I was just about to report this as a bug.  I've noticed it too.  

For instance, as a slight modification to Docbook-stylesheets (and the
DTD), we've defined a special "Requirement" environment, which is just
a specially numbered, titled area of text.  DSSSL snippet below.

What doesn't seem to work for us is the

	keep-with-next?: #t

I was not sure that I was properly undstanding the semantics of that
parameter.

I'd be curious if it was a known bug.  I suspect, if so, it wouldn't be too hard to fix?

.....A. P. Harris...apharris@xxxxxxxxxxxxxx<URL:http://www.onShore.com/>

(define ($requirement$)
  (let* ((p-label (literal (element-label (parent (current-node)) #t)))
	 (c-label (literal 
		   (format-number (child-number (current-node)) "1")))
	 (title (select-elements (children (current-node)) "TITLE"))
	 (has-title (not (node-list-empty? title)))
	 (r-title (if has-title 
		      (make sequence
			(with-mode xref-title-mode
			  (process-node-list (node-list-first title))))
		      (literal ""))))
    
    (make display-group
      space-before: %block-sep%
      space-after: %block-sep%
      (make paragraph
	font-family-name: %title-font-family%
	font-weight: 'bold
	space-before: %para-sep%
	space-after: %para-sep%
	keep-with-next?: #t
	(literal "Requirement: ")
	p-label
	(literal ".")
	c-label
	(literal " ")
	r-title)
      (process-children))))


 DSSSList info and archive:  http://www.mulberrytech.com/dsssl/dssslist