diff options
author | Nik Clayton <nik@FreeBSD.org> | 2002-10-28 19:35:31 +0000 |
---|---|---|
committer | Nik Clayton <nik@FreeBSD.org> | 2002-10-28 19:35:31 +0000 |
commit | 66e8205da436805146bc5d6a9ffa1de702caf3ef (patch) | |
tree | 56b8897df8eb45a2f6084cd3b530a4e8fb209386 /share/sgml/freebsd.dsl | |
parent | d53073372fcb4bf8dab7a9a4788674867dd5d533 (diff) |
Notes
Diffstat (limited to 'share/sgml/freebsd.dsl')
-rw-r--r-- | share/sgml/freebsd.dsl | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/share/sgml/freebsd.dsl b/share/sgml/freebsd.dsl index f23c8b763d..f2aaaa6819 100644 --- a/share/sgml/freebsd.dsl +++ b/share/sgml/freebsd.dsl @@ -145,6 +145,13 @@ "/pkg-descr"))) (create-link (list (list "HREF" href)) ($mono-seq$)))) (else ($mono-seq$))))) + + ;; Ensure that we start with no preferred mediaobject notations, + ;; so that in the text-only case we don't choose any of the + ;; possible images, and fallback to the most appropriate + ;; textobject + (define preferred-mediaobject-notations + '()) ]]> <!-- HTML with images ............................................ --> @@ -157,9 +164,8 @@ ; displaying the image. (element mediaobject - (if (node-list-empty? (select-elements (children (current-node)) (normalize "imageobject"))) - (process-children) - (process-node-list (select-elements (children (current-node)) (normalize "imageobject"))))) + (make element gi: "P" + ($mediaobject$))) (define %graphic-default-extension% "png") |