From 26767cc88c0548ad7978021796d0ccc4c9f7ffed Mon Sep 17 00:00:00 2001 From: Ralph Amissah Date: Sat, 2 Jun 2007 11:27:06 +0100 Subject: 0.53.0, pre-build, see changelog, library naming changed for scm, placed under v0 (instead of 0.53) --- lib/sisu/0.52/shared_html_lite.rb | 180 -------------------------------------- 1 file changed, 180 deletions(-) delete mode 100644 lib/sisu/0.52/shared_html_lite.rb (limited to 'lib/sisu/0.52/shared_html_lite.rb') diff --git a/lib/sisu/0.52/shared_html_lite.rb b/lib/sisu/0.52/shared_html_lite.rb deleted file mode 100644 index 4d4e03b1..00000000 --- a/lib/sisu/0.52/shared_html_lite.rb +++ /dev/null @@ -1,180 +0,0 @@ -=begin - * Name: SiSU information Structuring Universe - Structured information, Serialized Units - * Author: Ralph Amissah - * http://www.jus.uio.no/sisu - * http://www.jus.uio.no/sisu/SiSU/download.html - - * Description: modules shared by db and flatfile output generators, mostly xml/xhtml/html formatting - - * Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007 Ralph Amissah - - * License: GPL 2 or later - - Summary of GPL 2 - - This program is free software; you can redistribute it and/or modify it - under the terms of the GNU General Public License as published by the Free - Software Foundation; either version 2 of the License, or (at your option) - any later version. - - This program is distributed in the hope that it will be useful, but WITHOUT - ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or - FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for - more details. - - You should have received a copy of the GNU General Public License along - with this program; if not, write to the Free Software Foundation, Inc., - 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA - - If you have Internet connection, the latest version of the GPL should be - available at these locations: - http://www.fsf.org/licenses/gpl.html - http://www.gnu.org/copyleft/gpl.html - http://www.jus.uio.no/sisu/gpl2.fsf - - SiSU was first released to the public on January 4th 2005 - - SiSU uses: - - * Standard SiSU markup syntax, - * Standard SiSU meta-markup syntax, and the - * Standard SiSU object citation numbering and system - - © Ralph Amissah 1997, current 2007. - All Rights Reserved. - - * Ralph Amissah: ralph@amissah.com - ralph.amissah@gmail.com -=end -module SiSU_Format_Shared - require SiSU_lib + '/defaults' - include SiSU_Viz - class CSS_Format - def initialize(content=nil,id=nil,ocnd='',ocns='',lv='',hname=nil) - content.gsub!(/<:i[12]>/,'') - @content=content - @id=@ocn=id - @ocnd,@ocns=ocnd,ocns - @lv=@notenumber=lv.to_s - @hname=hname.to_s - @tab="\t" - # lots introduced to do html tables in db - @@tablehead,@@tablefoot=[],[] - @vz=SiSU_Env::Get_init.instance.skin - end - def paragraph - %{#{@tab*1}

\n#{@tab*2}#@content\n#{@tab*1}

\n} << "\n" - end - def endnote - < -#{@tab*2}#@notenumber. #@content -#{@tab*1}

-GSUB - end - def lev_toc_hname - %{#{@tab*1}

\n#{@tab*2}#@content\n#{@tab*1}

\n} << "\n" - end - def lev_toc - %{#{@tab*1}

\n#{@tab*2}#@content\n#{@tab*1}

\n} << "\n" - end - def lev4_plus - %{#{@tab*1}

\n#{@tab*2}#@content\n#{@tab*1}

\n} << "\n" - end - def lev4_minus - %{#{@tab*1}

\n#{@tab*2}#@content\n#{@tab*1}

\n} << "\n" - end - def norm_comment - %{#{@tab*1}

\n#{@tab*2}#@content\n#{@tab*1}

\n} - end - def norm - %{#{@tab*1}

\n#{@tab*2}#@content\n#{@tab*1}

\n} - end - def indent1 - %{#{@tab*1}

\n#{@tab*2}#@content\n#{@tab*1}

\n} - end - def indent2 - %{#{@tab*1}

\n#{@tab*2}#@content\n#{@tab*1}

\n} - end - def para_table - %{

} - end - def ocn - %{#{@tab*1}

#@ocn

} << "\n" - end - def html_table # get rid of use html_table - @new_content=[] - @content.split(/\n/).each do |parablock| - m=parablock[//,1] - @@tablefoot</,'') - @@tablehead=1 if parablock =~//, - #%{

\n} + - %{}) - if parablock =~// - tablefoot=[] - @@tablefoot.each {|x| tablefoot << %{

#{x}

\n}} - @@tablefoot=[] - parablock.gsub!(//, - %{#{@vz.table_close}\n}) # + - #%{#{tablefoot}}) - end - if @@tablehead == 1 - if parablock =~/¡¡/ - parablock.gsub!(/} + - %{\n') - @@tablehead=0 #if parablock =~/!>/ - end - parablock - else - parablock.gsub!(/} + - %{\n') - parablock - end - @new_content << parablock - end - @new_content.join - end - end - class CSS_Format_generic #does CSS_Format in one definition, needs to be told about class, despite brevity of generic, easier to see structure with CSS_Format - def initialize(css_class='',content='',id=nil,ocnd=nil,ocns=nil,lv='',hname=nil) - @tab="\t" - @class=css_class - @content=content - @lv=@notenumber=lv.to_s - #@ocn=ocn.to_s - @hname=hname.to_s - @id=@ocn=id - end - def paragraph - css_class=%{class="#@class" } - if @ocn - id=%{id="#@ocn" } - type=%{type="substantive" } - else - id=%{id="none" } - type=%{type="comment" } - end - header=%{header="#@hname" } if @hname - %{#{@tab*1}

\n#{@tab*2}#@content\n#{@tab*1}

\n} << "\n" - end - def para - paragraph - end - end -end -__END__ - -- cgit v1.2.3
} + - %{#{para_table}}) - parablock.gsub!(/¡¡(\d+?)¡/, - %{} + - %{#{para_table}}) - parablock.gsub!(/!>/, '
} + - %{#{para_table}}) - parablock.gsub!(/¡¡(\d+?)¡/, - %{} + - %{#{para_table}}) - parablock.gsub!(/!>/, '