From 69e8c05210e249e679b259cb843a5e708273e9be Mon Sep 17 00:00:00 2001
From: Ralph Amissah <ralph@amissah.com>
Date: Sun, 14 Oct 2007 21:29:55 +0100
Subject: shared markup source output moved to own common src directory

---
 lib/sisu/v0/urls.rb | 14 +++++++++++---
 1 file changed, 11 insertions(+), 3 deletions(-)

(limited to 'lib/sisu/v0/urls.rb')

diff --git a/lib/sisu/v0/urls.rb b/lib/sisu/v0/urls.rb
index 7f087b95..1f9cfbe8 100644
--- a/lib/sisu/v0/urls.rb
+++ b/lib/sisu/v0/urls.rb
@@ -97,7 +97,7 @@ module SiSU_urls
       @odf_viewer=@env.program.odf_viewer
       @manpage_gen=@env.program.manpage_generator
       source=if @opt.fns =~/\.sst$/; @opt.fns
-      elsif @opt.fns =~/\._sst/; "#@fnb.composite.sst"
+      elsif @opt.fns =~/\._sst/; "#@fnb.ssm.sst"
       else 'not recognised file'
       end
       @u ||= {
@@ -122,7 +122,7 @@ module SiSU_urls
         'p (PDF portrait)'=>@fn[:pdf_p],
         'P[iu] (DB postgresql import/update)'=>'psql',
         's (sisu markup)'=>source,
-        'S (sisupod)'=>'sisupod.zip',
+        'S (sisupod)'=>@fn[:sisupod],
         'x (XML sax type)'=>@fn[:sax],
         'X (XML dom type)'=>@fn[:dom],
         'y (Manifest, html)'=>@fn[:manifest],
@@ -185,7 +185,7 @@ module SiSU_urls
       @pwd_stub="#@webserv_url"[m,1]
       @u.each do |x,y|
         if @opt.fns =~ @m_regular
-          if x=~/^([abchHNopsSwxXyY])/ and @opt.cmd=~/[abchHNopsSwxXyY]/ and x=~/^[#{@opt.cmd}]/
+          if x=~/^([abchHNopwxXyY])/ and @opt.cmd=~/[abchHNopwxXyY]/ and x=~/^[#{@opt.cmd}]/
             m=$1
             tell=SiSU_Screen::Ansi.new(@opt.cmd,"-#{x}","#@browser #@webserv_url/#@fnb/#{y}")
             tell.result unless @opt.cmd =~/q/
@@ -216,6 +216,14 @@ module SiSU_urls
             tell.result unless @opt.cmd =~/q/
             @opt.cmd.gsub!(/P[iu]/,'')
           end
+          if x=~/^[sS]/ and @opt.cmd =~/[sS]/
+            zipfile=if @opt.fns =~/\._sst$/; y.gsub(/(?:\~\S{2,3})?(\._sst\.zip)$/,'.ssm.zip')
+            else y.gsub(/(?:\~\S{2,3})?(\.sst\.zip)$/,'\1')
+            end
+            tell=SiSU_Screen::Ansi.new(@opt.cmd,"-#{x}","#@browser #@webserv_url/src/#{y}")
+            tell.result unless @opt.cmd =~/q/
+            @opt.cmd.gsub!(/I/,'')
+          end
           urls_maintenance(@opt,x,y) if @opt.cmd =~/[MV]/
         end
       end
-- 
cgit v1.2.3