diff visualise.xpl @ 48:5d9806f90896

basic integration of shared, but copying <f> is wrong, should reconstruct by denormalising <nf> for new home
author Henry S. Thompson <ht@markup.co.uk>
date Wed, 10 May 2017 16:52:04 +0100
parents ac6d1ca099f7
children 588cb9ba7c9c
line wrap: on
line diff
--- a/visualise.xpl	Tue May 09 23:08:18 2017 +0100
+++ b/visualise.xpl	Wed May 10 16:52:04 2017 +0100
@@ -21,6 +21,12 @@
   </p:documentation>
  </p:option>
  
+ <p:option name="raw">
+  <p:documentation xmlns="http://www.w3.org/1999/xhtml">
+   <div>If supplied, then use as output file for rect step</div>
+  </p:documentation>
+ </p:option>
+ 
  <p:variable name="base" select="base-uri()">
   <p:pipe step="vis" port="source"/>
  </p:variable>
@@ -77,13 +83,40 @@
  <p:xslt name="rect">
    <p:input port="source">
     <p:pipe step="format" port="result"/>
+    <p:pipe step="shared" port="result"/>
    </p:input>
   <p:input port="stylesheet">
    <p:pipe step="ss2" port="result"/>
   </p:input>
   <p:with-param name="sheet-number" select="$sheet-number"/>
   <p:with-param name="xlDir" select="$root"/>  
- </p:xslt> 
+ </p:xslt>
+
+ <p:choose>
+  <p:when test="p:value-available('raw')">
+   <cx:message>
+    <p:with-option name="message" select="concat($root,'worksheets/',$raw)"/>
+   </cx:message>
+   <p:store name="dump">
+    <p:input port="source">
+     <p:pipe step="rect" port="result"/>
+    </p:input>
+    <p:with-option name="href" select="concat($root,'worksheets/',$raw)"/>
+   </p:store>
+   <p:sink>
+    <p:input port="source">
+     <p:pipe step="dump" port="result"/>
+    </p:input>
+   </p:sink>
+  </p:when>
+  <p:otherwise>
+   <p:sink>
+    <p:input port="source">
+     <p:pipe step="rect" port="result"/>
+    </p:input>
+   </p:sink>
+  </p:otherwise>
+ </p:choose>
 
  <p:load name="ssr">
   <p:with-option name="href" select="concat($elabDir,'/refs.xsl')"/>