} end def seg_head_navigation_band(type='') firstseg=%{ #{@vz.png_nav_nxt} } if @md.firstseg =~/\S+/ %{ } %{

#{@vz.banner_band}

#{doc_types}

#{firstseg} #{@vz.table_close}

} end def seg_head_navigation_band_bottom(type='') #retired 2.7.9 if type=~/pdf/ @tocband_segtoc=make_scroll_seg_pdf end firstseg=%{ #{@vz.png_nav_nxt} } if @md.firstseg =~/\S+/ %{ } %{

#{@tocband_segtoc} #{firstseg} #{@vz.table_close}
} end def manifest_link(text) %{ #{text} } end def concordance_link(text) #retired 2.7.9 if @md.concord_make %{ #{text} } else '' end end def make_seg_scroll_pdf wgt=Widget.new(@md) scroll=%{
#{@vz.nav_txt_doc_link}
#{wgt.manifest} #{wgt.search}

} end def make_scroll_seg_pdf manifest=scroll=seg='' wgt=Widget.new(@md) seg=%{

#{@vz.nav_txt_toc_link}

#{wgt.manifest} #{wgt.search}

} end def make_concordance manifest=scroll=seg='' wgt=Widget.new(@md) %{

#{wgt.manifest} #{wgt.search}

} end def head rdf=SiSU_XML_tags::RDF.new(@md) %{#{doc_type} #{@md.html_title} #{rdf.metatag_html} #{@css.html} #{@vz.color_body} #{@vz.js_top}} end def concordance if @md.concord_make %{#{@vz.margin_css}

#{@vz.txt_hp}
Quick Ref.:
Manifest

#{@vz.txt_hp}
Quick Ref.:
Manifest
#{url}

^©

Rights: #{rights}

} end self end def prefix_b %{

Prefix: #{@md.prefix_b}

} end def scroll_head_title_banner_open %{

#{@md.icon}

#{@vz.nav_txt_doc_link}

#{concord} #{@vz.table_close}} end def make_seg concord=concordance_link(@vz.nav_txt_concordance) %{

#{@vz.nav_txt_toc_link}

#{concord} #{@vz.table_close}} end def manifest #check structure manifest=manifest_link(@vz.nav_txt_manifest) %{#{@vz.margin_txt_3} #{@vz.paragraph_font_small} #{manifest} #{@vz.table_close}} end def concordance #check structure concord=concordance_link(@vz.nav_txt_concordance) %{#{@vz.margin_txt_3} #{@vz.paragraph_font_small} #{concord} #{@vz.table_close}} end def metadata %{#{@vz.margin_css}

MetaData

#{@vz.table_close}} end def seg_metadata @metalink=%{./#{@md.fn[:metadata]}} metadata end def seg_tail %{

#{@vz.banner_band}

#{@vz.credits_splash} #{@vz.credits_sisu}

} end def scroll_tail #debug nav=scroll_head_navigation_band %{

#{nav} #{@vz.credits_splash} #{@vz.credits_sisu}

} end def seg_navigation_tail #this is a bug area, look up and "tidy" %{

#{@vz.credits_splash} #{@vz.credits_sisu}

} end end class Head_seg < Head_information def initialize(md) #(md='') super(md) end def head rdf=SiSU_XML_tags::RDF.new(@md) %{#{doc_type} #{@seg_name_html[@seg_name_html_tracker]} - #{@md.html_title} #{rdf.metatag_html} #{@vz.font_css_table_file} #{@vz.color_body} #{@vz.js_top}} end def title_banner(title,subtitle,creator) end def dot_control_pre_next %{

#{@vz.png_nav_dot_pre}

#{@vz.png_nav_dot_toc}

#{@vz.png_nav_dot_nxt} #{@vz.table_close}} end def dot_control_pre %{} pre=%{} if f_pre==true nxt=%{} if f_nxt==true %{

#{@vz.png_nav_dot_pre}

#{@vz.png_nav_dot_toc}

#{@vz.png_nav_dot_nxt} #{@vz.table_close}} end def toc_nav(f_pre=false,f_nxt=false,use=1) pre=nxt='' toc=%{

#{@vz.png_nav_toc}

#{@vz.png_nav_pre}

#{@vz.png_nav_nxt}

#{pre} #{toc} #{nxt}

#{@vz.table_close}} end def toc_next2 pre,nxt=false,true toc_nav(false,true).dup end def toc_pre_next2 toc_nav(true,true).dup end def toc_pre2 toc_nav(true,false,2).dup end def manifest_link(text) %{ #{text} } end def concordance_link(text) if @md.concord_make %{ #{text} } else '' end end def navigation_table %{

} end def navigation_table1 %{

} end def navigation_table2 %{

} end def heading_advert_local_1 dir=SiSU_Env::Info_env.new(@fns) %{

$#{@md.ad_alt}$

#{@vz.table_close} } end def heading_advert_local_2 dir=SiSU_Env::Info_env.new(@fns) %{

$#{@md.ad_alt}$

#{@vz.table_close} } end def heading_advert_external dir=SiSU_Env::Info_env.new(@fns) %{

$#{@md.ad_alt}$

#{@vz.table_close} } end def credit %{

#{@vz.credits_splash} #{@vz.credits_sisu}

} end def navigation_band(segtocband,seg_table_top_control) #change name to navigation_band_banner %{

#{@vz.banner_band}

#{doc_types}

#{segtocband}

#{seg_table_top_control}} end def navigation_band_bottom(segtocband,seg_table_top_control) #change name to navigation_band_bannerless %{

#{doc_types}

#{segtocband}

#{seg_table_top_control}

} end def endnote_mark %{

} end def endnote_section_open %{

} end def endnote_section_close %{

} #revisit end def head rdf=SiSU_XML_tags::RDF.new(@md) %{#{doc_type} #{@seg_name_html[@seg_name_html_tracker]} - #{@md.html_title} #{rdf.metatag_html} #{@css.html} #{@vz.color_body} #{@vz.js_top}} end def toc_metadata @metalink=%{./#{@md.fn[:meatadata]}} toc_metadata end def title_banner(title,subtitle,creator) %{

#{title}

#{subtitle}

#{creator}

copy @ #{@vz.txt_home}

} end end class Head_scroll < Head_toc def initialize(md) super(md) end def toc_owner_details %{#{@vz.margin_txt_3} #{@vz.paragraph_font_small} Owner Details #{@vz.table_close}} end end class Format_text_object @vz=SiSU_Env::Get_init.instance.skin attr_accessor :md,:t_o,:txt,:ocn,:format,:table,:link,:linkname,:paranum,:p_num,:headname,:banner,:url def initialize(md,t_o) @md,@t_o=md,t_o if t_o.class==Hash @txt =t_o[:txt] || nil @ocn =t_o[:ocn] || nil @ocn_display =t_o[:ocn_display] || nil @headname =t_o[:headname] || nil @trailer =t_o[:trailer] || nil @endnote_part_a =t_o[:endnote_part_a] || nil @endnote_part_b =t_o[:endnote_part_b] || nil @lnk_url =t_o[:lnk_url] || nil @lnk_txt =t_o[:lnk_txt] || nil @format =t_o[:format] || nil elsif t_o.class.inspect =~/^(?:#<)?SiSU_document_structure/ @dob=t_o if defined? t_o.is @named=nametags_seg(@dob) @txt=((defined? t_o.obj) ? t_o.obj : nil) @ocn=((defined? t_o.ocn) ? t_o.ocn.to_s : nil) @headname=((t_o.is=='heading' and defined? t_o.name) ? t_o.name : nil) else if @md.cmd =~/M/ p t_o.class p caller end end @headnamed= (@headname ? %{} : nil) if @txt and not @txt.empty? @txt.gsub!(/#{Mx[:mk_o]}[-~]##{Mx[:mk_c]}/,'') end @p_num=Paragraph_number.new(@md,@ocn) @vz=SiSU_Env::Get_init.instance.skin end def nametags_scroll(dob) tags='' if defined? dob.tags \ and dob.tags.length > 0 # insert tags "hypertargets" dob.tags.each do |t| tags=tags +%{} end end tags end def nametags_seg(dob) #FIX tags='' if defined? dob.tags \ and dob.tags.length > 0 # insert tags "hypertargets" dob.tags.each do |t| tags=tags +%{} end end tags end def headname #check whether used hn=if @t_o.is =='heading' \ and not @t_o.name.empty? #determine use hn=if @t_o.is =='heading'; %{} else %{} end else nil end hn end def endnote_body %{

#{@txt}

} end def endnote_body_indent %{

#{@txt}

} end def no_paranum %{

#{@txt}

} end def para_form_css(tag,attrib) # regular paragraphs shaped here ul=ulc='' ul,ulc="

\n ","\n " if @tag =~/li/ %{

#{@p_num.ocn_display} #{ul}<#{tag} class="#{attrib}" #{@p_num.id}> #{@named}#{@txt} #{ulc}

} end def para para_form_css('p','norm') end def group para_form_css('p','group') end def alt para_form_css('p','alt') end def verse para_form_css('p','verse') end def code para_form_css('p','code') end def center para_form_css('p','center') end def bold para_form_css('p','bold') end def bullet para_form_css('li','bullet') end def table @txt=if @t_o.obj !~/^
') @txt.gsub!(/#{Mx[:obj_ln_sep]}/,'

') para_form_css('p','norm') end def format(tag,attrib) para_form_css(tag,attrib) end def heading_normal(tag,attrib) %{

#{@p_num.ocn_display} <#{tag} class="#{attrib}" #{@p_num.id}>#{@p_num.name} #{@named}#{@txt}

} end def heading_body heading_normal('p','norm') end def heading_body1 heading_normal('h1','norm') end def heading_body2 heading_normal('h2','norm') end def heading_body3 heading_normal('h3','norm') end def heading_body4 heading_normal('h4','norm') end def heading_body5 heading_normal('h5','norm') end def heading_body6 heading_normal('h6','norm') end def title_heading(tag,attrib) %{

<#{tag} class="#{attrib}"> #{@named}#{@txt}

} end def title_heading1 title_heading('h1','tiny') end def title_heading2 title_heading('h2','tiny') end def title_heading3 title_heading('h3','tiny') end def title_heading4 '' end def seg_heading_sub(tag,attrib) @txt.gsub!(/(?:#{Mx[:en_a_o]}.+?#{Mx[:en_a_c]}|#{Mx[:en_b_o]}.+?#{Mx[:en_b_c]})\s*/m,' ') %{

#{@p_num.ocn_display} <#{tag} class="#{attrib}" #{@p_num.id}>#{@p_num.name} #{@headnamed} #{@named}#{@txt}

} end def seg_heading4 %{

#{@p_num.ocn_display}

#{@p_num.name} #{@txt}

} end def seg_heading5 seg_heading_sub('p','bold') end def seg_heading6 seg_heading_sub('p','bold') end def dl #check :trailer "

#{@txt} #{@trailer}" end def table_css_end '

' end def gsub_body #fix case @txt when /^$(i+|iv|v|vi+|ix|x|xi+)$/ @txt.gsub!(/^$(i+|iv|v|vi+|ix|x|xi+)$/,'(\1)') when /^$?(\d|[a-z])+$/ @txt.gsub!(/^$(\d+|[a-z])+$/,'(\1)') when /^\s*\d{1,3}\.\s/ @txt.gsub!(/^\s*(\d+\.)/,'\1') when /^\s*[A-Z]\.\s/ @txt.gsub!(/^\s*([A-Z]\.)/,'\1') end end def bold_para %{#{@vz.margin_txt_0}

#{@txt}

#{@vz.margin_num_css} #{@vz.table_close}} end def bold_heading @txt.gsub!(/[1-9]~(\S+)/,'') @txt.gsub!(/[1-9]~/,'') %{

#{@txt}

#{@vz.margin_num_css} #{@vz.table_close}} end def toc_head_copy_at %{

#{@txt}

\n} end def center %{

#{@txt}

\n} end def bold %{

#{@txt}

\n} end def center_bold %{

#{@txt}

\n} end end class Format_scroll < Format_text_object def initialize(md,txt) super(md,txt) @vz=SiSU_Env::Get_init.instance.skin end end class Format_seg < Format_text_object def initialize(md,txt) super(md,txt) end def navigation_toc_lev1_advert %{#{@banner.home_button}\n #{@txt} #{@two}

} end def navigation_toc_lev1 %{#{@banner.nav_toc}} end def navigation_toc_lev2 #change bold use css %{

#{@txt}
#{@vz.table_close}} end def navigation_toc_lev3 #change bold use css %{

#{@txt}
#{@vz.table_close}} end def navigation_toc_lev4 %{

#{@txt}
#{@vz.table_close}} end def navigation_toc_lev5 end def navigation_toc_lev6 end def endnote_seg_body(fn='') #FIX #url construction keep within single line... BUG WATCH 200408 fn='doc' if fn.to_s.empty? #you may wish to reconsider, sends to 'doc' where no segment info %{
#{@endnote_part_a}#{@md.fnl[:pre]}#{fn}#{@md.fnl[:mid]}#{Sfx[:html]}#{@md.fnl[:post]}#{@endnote_part_b}
} end def clean(txt) txt.gsub!(/#{Mx[:en_a_o]}.+?#{Mx[:en_a_c]}/,'') txt.gsub!(/#{Mx[:en_b_o]}.+?#{Mx[:en_b_c]}/,'') txt end def subtoc_lev(tag,attrib) @txt=clean(@txt) txt=if @txt \ and @txt =~/<\/?i>|/mi @txt.gsub(/<\/?i>|/mi,'') #removes name markers from subtoc, go directly to substantive text else @txt end note='' if txt =~/(#{Mx[:en_a_o]}.+?#{Mx[:en_a_c]}|#{Mx[:en_b_o]}.+?#{Mx[:en_b_c]})/m # had \s* at end note=$1 note.gsub!(/[\n\s]+/m,' ') txt.gsub!(/(?:#{Mx[:en_a_o]}.+?#{Mx[:en_a_c]}|#{Mx[:en_b_o]}.+?#{Mx[:en_b_c]})\s*/m,' ') txt.gsub!(/ ^{\d+<\/sup> /m,'')
end
%{<#{tag} class="#{attrib}">
#{txt} #{note}
}
end
def subtoc_lev5
subtoc_lev('h5','subtoc') if @txt
end
def subtoc_lev6
subtoc_lev('h6','subtoc') if @txt
end
def heading_sub(tag,attrib)
@txt.gsub!(/(?:#{Mx[:en_a_o]}.+?#{Mx[:en_a_c]}|#{Mx[:en_b_o]}.+?#{Mx[:en_b_c]})\s*/m,' ')
%{

#{@p_num.ocn_display}
<#{tag} class="#{attrib}" #{@p_num.id}>#{@p_num.name} #{@headnamed}
#{@txt}

}
end
def heading5
heading_sub('p','bold')
end
def heading6
heading_sub('p','bold')
end
def heading4
%{

#{@p_num.ocn_display}
#{@p_num.name}
#{@t_o[:format]}
#{@txt}

}
end
def navigation_heading4
%{

#{@txt}

#{@vz.table_close}}
end
def navigation_heading5
%{
#{@txt}
}
end
def navigation_heading6
%{
#{@txt}
}
end
def navigation_center
"#{@txt}"
end
end
class Format_toc < Format_text_object
def initialize(md,txt)
super(md,txt)
end
def links_guide
%{

#{@lnk_txt}

}
end
def lev(tag,attrib)
if @txt
%{<#{tag} class="#{attrib}">
#{@txt}

}
else ''
end
end
def lev1
lev('h1','toc')
end
def lev2
lev('h2','toc')
end
def lev3
lev('h3','toc')
end
def lev4
lev('h4','toc')
end
def lev5
lev('h5','toc')
end
def lev6
lev('h6','toc')
end
def lev0 #docinfo
lev('h0','toc')
end
def strip_endnotes(txt)
txt.gsub!(/(?:#{Mx[:en_a_o]}.+?#{Mx[:en_a_c]}|#{Mx[:en_b_o]}.+?#{Mx[:en_b_c]})\s*/m,' ')
txt
end
def mini_lev1
@txt=strip_endnotes(@txt)
lev('h1','minitoc')
end
def mini_lev2
@txt=strip_endnotes(@txt)
lev('h2','minitoc')
end
def mini_lev3
@txt=strip_endnotes(@txt)
lev('h3','minitoc')
end
def mini_lev4
@txt=strip_endnotes(@txt)
lev('h4','minitoc')
end
def mini_lev5
@txt=strip_endnotes(@txt)
lev('h5','minitoc')
end
def mini_lev6
@txt=strip_endnotes(@txt)
lev('h6','minitoc')
end
def mini_lev0 #docinfo
lev('h0','minitoc')
end
def mini_tail
%{

Manifest (alternative outputs)

}
end
def mini_concord_tail
%{

Concordance (wordlist)

Manifest (alternative outputs)

}
end
end
class Format_str
def initialize(md,str)
@str=str
end
def center
%{#{@str}\n}
end
def bold
%{#{@str}\n}
end
def center_bold
%{#{@str}\n}
end
def endnote_body
%{

#{@str}

}
end
end
end
__END__}

Concordance

MetaData

#{@p_num.name} #{@txt}

#{@p_num.name} #{@t_o[:format]} #{@txt}

Manifest (alternative outputs)

Concordance (wordlist)

Manifest (alternative outputs)