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/xml_tables.rb | 202 -------------------------------------------- 1 file changed, 202 deletions(-) delete mode 100644 lib/sisu/0.52/xml_tables.rb (limited to 'lib/sisu/0.52/xml_tables.rb') diff --git a/lib/sisu/0.52/xml_tables.rb b/lib/sisu/0.52/xml_tables.rb deleted file mode 100644 index 5f48c3f7..00000000 --- a/lib/sisu/0.52/xml_tables.rb +++ /dev/null @@ -1,202 +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: common file for xml table generation - - * 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_Tables - require SiSU_lib + '/defaults' - include SiSU_Viz - class Table #_xml - @@tablehead=0 - @@tablefoot=[] #watch #bug??? #check was @@tablefoot - def initialize(one,ocn='') - @one,@parablock,@ocn,@vz=one,one,ocn,SiSU_Env::Get_init.instance.skin - end - def table_split #% used but, no longer operational, revisit - @new_content=[] - @one.split(/\n/).each do |parablock| - table=Table_xml.new("#{parablock}\n") - @new_content << table.table - end - @new_content.join - end - end - class Table_xml /,1] - @@tablefoot << m if m - @parablock.gsub!(//,'') - @@tablehead=1 if @parablock =~//, - %{\n#@ocn
}) - end - if @parablock =~// - tablefoot=[] - #bug table footers need rethink, removed for now - @@tablefoot.each {|x| tablefoot << ''} - @@tablefoot=[] - @parablock.gsub!(/\s+<~(\d+);(?:\w|[0-6]:)\d+;\w\d+><#@dp:#@dp>/,"
\n") # + - @parablock.gsub!(/\s*/,"\n") - end - if @@tablehead == 1 - if @parablock =~/¡¡/ - @parablock.gsub!(/ - - #{@vz.paragraph_table_xml}}) - @parablock.gsub!(/¡¡(\d+?)¡/, - %{ - #{@vz.paragraph_table_xml}}) - @parablock.gsub!(/!>/,"\n\n") - @@tablehead=0 - end - @parablock - else - @parablock.gsub!(/ - - #{@vz.paragraph_table_xml}}) - @parablock.gsub!(/¡¡(\d+?)¡/, - %{ - - - #{@vz.paragraph_table_xml}}) - @parablock.gsub!(/!>/,"\n\n\n") - end - @parablock - end - end - class Table_xml_exp - - - - " - end - def table - m=@parablock[//,1] - @@tablefoot << m if m - @parablock.gsub!(//,'') - @@tablehead=1 if @parablock =~//; @parablock=table_head($1) - end - if @parablock =~// - tablefoot=[] - @@tablefoot.each {|x| tablefoot << ''} - @@tablefoot=[] - if @parablock =~//; @parablock=table_end - end - end - if @@tablehead == 1 - if @parablock =~/¡¡/ - if @parablock =~// - @parablock.gsub!(/!>/,table_row_close(true)) - end - @@tablehead=0 - end - @parablock - else - if @parablock =~// - @parablock.gsub!(/!>/,table_row_close) - end - @parablock - end - @parablock - end - end -end - -- cgit v1.2.3
- - -} - end - def table_end(tablefoot='') - %{
#{@vz.margin_numless}#{@vz.margin_numless} #{@vz.table_close} -#{tablefoot}} - end - def table_row(inf,h=false) - bold=if h; '' - else '' - end - %{ -
#{bold}} - end - def table_cell(inf,h=false) - if h; %{} - else %{} - end - end - def table_row_close(h=false) - bold_close=if h; '' - else '' - end - "#{bold_close}