From: Norman Walsh <ndw@nwalsh.com>
Date: Mon, 28 Jan 2002 16:13:09 +0000 (+0000)
Subject: Provide option to allow URLs to be conditionally hyphenated
X-Git-Tag: release/1.79.1~6^2~5948
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=bea1474e97d3b6eafcafb41a8f746b114fa2034f;p=docbook-dsssl

Provide option to allow URLs to be conditionally hyphenated
---

diff --git a/xsl/fo/param.ent b/xsl/fo/param.ent
index c187d1382..69e870864 100644
--- a/xsl/fo/param.ent
+++ b/xsl/fo/param.ent
@@ -121,6 +121,7 @@
 <!ENTITY toc.section.depth SYSTEM "../params/toc.section.depth.xml">
 <!ENTITY use.extensions SYSTEM "../params/use.extensions.xml">
 <!ENTITY ulink.footnotes SYSTEM "../params/ulink.footnotes.xml">
+<!ENTITY ulink.hyphenate SYSTEM "../params/ulink.hyphenate.xml">
 <!ENTITY ulink.show SYSTEM "../params/ulink.show.xml">
 <!ENTITY variablelist.as.blocks SYSTEM "../params/variablelist.as.blocks.xml">
 <!ENTITY verbatim.properties SYSTEM "../params/verbatim.properties.xml">
diff --git a/xsl/fo/param.xweb b/xsl/fo/param.xweb
index 3c9d72adb..0900f64c2 100644
--- a/xsl/fo/param.xweb
+++ b/xsl/fo/param.xweb
@@ -188,6 +188,7 @@ to be incomplete. Don't forget to read the source, too :-)</para>
 &blockquote.properties;
 &ulink.show;
 &ulink.footnotes;
+&ulink.hyphenate;
 </reference>
 
 <reference><title>FO</title>
@@ -467,6 +468,7 @@ around all these parameters.</para>
 <src:fragref linkend="toc.section.depth.frag"/>
 <src:fragref linkend="use.extensions.frag"/>
 <src:fragref linkend="ulink.footnotes.frag"/>
+<src:fragref linkend="ulink.hyphenate.frag"/>
 <src:fragref linkend="ulink.show.frag"/>
 <src:fragref linkend="variablelist.as.blocks.frag"/>
 <src:fragref linkend="verbatim.properties.frag"/>
diff --git a/xsl/fo/xref.xsl b/xsl/fo/xref.xsl
index 49754d44e..3023c0c07 100644
--- a/xsl/fo/xref.xsl
+++ b/xsl/fo/xref.xsl
@@ -344,7 +344,9 @@
                  xsl:use-attribute-sets="xref.properties">
     <xsl:choose>
       <xsl:when test="count(child::node())=0">
-	<xsl:value-of select="@url"/>
+        <xsl:call-template name="hyphenate-url">
+          <xsl:with-param name="url" select="@url"/>
+        </xsl:call-template>
       </xsl:when>
       <xsl:otherwise>
 	<xsl:apply-templates/>
@@ -356,12 +358,34 @@
                 and $ulink.show != 0">
     <fo:inline hyphenate="false">
       <xsl:text> [</xsl:text>
-      <xsl:value-of select="@url"/>
+      <xsl:call-template name="hyphenate-url">
+        <xsl:with-param name="url" select="@url"/>
+      </xsl:call-template>
       <xsl:text>]</xsl:text>
     </fo:inline>
   </xsl:if>
 </xsl:template>
 
+<xsl:template name="hyphenate-url">
+  <xsl:param name="url" select="''"/>
+  <xsl:choose>
+    <xsl:when test="$ulink.hyphenate = ''">
+      <xsl:value-of select="$url"/>
+    </xsl:when>
+    <xsl:when test="contains($url, '/')">
+      <xsl:value-of select="substring-before($url, '/')"/>
+      <xsl:text>/</xsl:text>
+      <xsl:copy-of select="$ulink.hyphenate"/>
+      <xsl:call-template name="hyphenate-url">
+        <xsl:with-param name="url" select="substring-after($url, '/')"/>
+      </xsl:call-template>
+    </xsl:when>
+    <xsl:otherwise>
+      <xsl:value-of select="$url"/>
+    </xsl:otherwise>
+  </xsl:choose>
+</xsl:template>
+
 <xsl:template match="olink" name="olink">
   <xsl:apply-templates/>
 </xsl:template>
diff --git a/xsl/params/ulink.hyphenate.xml b/xsl/params/ulink.hyphenate.xml
new file mode 100644
index 000000000..0fc56f4bf
--- /dev/null
+++ b/xsl/params/ulink.hyphenate.xml
@@ -0,0 +1,28 @@
+<refentry id="ulink.hyphenate">
+<refmeta>
+<refentrytitle>ulink.hyphenate</refentrytitle>
+<refmiscinfo role="type">string</refmiscinfo>
+</refmeta>
+<refnamediv>
+<refname>ulink.hyphenate</refname>
+<refpurpose>Allow URLs to be automatically hyphenated</refpurpose>
+</refnamediv>
+
+<refsynopsisdiv>
+<src:fragment id='ulink.hyphenate.frag'>
+<xsl:param name="ulink.hyphenate" select="'&#xAD;'"/>
+</src:fragment>
+</refsynopsisdiv>
+
+<refsect1><title>Description</title>
+
+<para>If not empty, the specified character (or more generally, content) is
+added to URLs after every <quote>/</quote>. If the character specified is a
+Unicode soft hyphen (0x00AD) or Unicode zero-width space (0x200B), some FO
+processors will be able to reasonably hyphenate long URLs.</para>
+
+<para>As of 28 Jan 2002, discretionary hyphens are more widely and correctly
+supported than zero-width spaces for this purpose.</para>
+
+</refsect1>
+</refentry>