deplate 0.7.3

data/lib/deplate/mod/htmlslides-navbar-fh.rb

@@ -0,0 +1,32 @@
+# htmlslides-navbar-fh.rb
+# @Author:      Thomas Link, Fritz Heinrichmeyer
+# @Website:     http://deplate.sf.net/
+# @License:     GPL (see http://www.gnu.org/licenses/gpl.txt)
+# @Created:     17-M�r-2004.
+# @Last Change: 23-Okt-2005.
+# @Revision:    0.435
+
+
+class Deplate::Formatter::HTML_Site
+    def format_navigation_bar(invoker, type, slot, bartype, first=false, last=false)
+      idx, _, _ = navbar_output_index(invoker, first, last)
+      navmenu  = []
+      doctitle = @deplate.get_clip("title")
+      doctitle = if doctitle then  doctitle.elt.to_s else "" end
+      @deplate.each_heading(1) do |section, title|
+        unless section.args["noList"]
+          f = section.output_file_name
+          v = section.description.gsub(/<\/?[^>]*>/, "")
+        end
+        if @deplate.top_heading_idx(section.top_heading) != idx
+          navmenu << %{<a class="navbar" href="#{f}">#{v}</a>}
+        else
+          set_at(:pre, :head_title, %{<title>#{doctitle} #{v}</title>})
+          navmenu <<  %{<span class="navbartds">#{v}</span>}
+        end
+      end
+      @deplate.options.navmenu = navmenu.join("\n")
+      output_at(:body, slot, @deplate.options.navmenu.to_s)
+    end
+end
+

data/lib/deplate/mod/iconv.rb

@@ -0,0 +1,35 @@
+# iconv.rb
+# @Author:      Thomas Link (samul AT web.de)
+# @Website:     http://deplate.sf.net/
+# @License:     GPL (see http://www.gnu.org/licenses/gpl.txt)
+# @Created:     11-Apr-2005.
+# @Last Change: 23-Okt-2005.
+# @Revision:    0.84
+#
+# = Description
+# Recode text on-the-fly using +iconv+. The source encoding is 
+# taken from the +encoding+ variable (default: latin1), the target 
+# encoding is defined in the +recodeEncoding+ (default: utf-8) variable.
+
+require 'iconv'
+
+class Deplate::Formatter
+    def hook_pre_go_iconv
+        @iconv_encodings = {}
+        unless defined?(@iconv_enc_source)
+            source            = @deplate.variables['encoding'] || "latin1"
+            @iconv_enc_source = canonic_enc_name(source, @iconv_encodings)
+            target            = @deplate.variables['recodeEncoding'] || "utf-8"
+            @iconv_enc_target = canonic_enc_name(target, @iconv_encodings)
+            @deplate.variables['encoding'] = target
+        end
+        unless defined?(@iconv_converter) and @iconv_converter
+            @iconv_converter = Iconv.new(@iconv_enc_target, @iconv_enc_source)
+        end
+    end
+
+    def plain_text_recode(text)
+        @iconv_converter.iconv(text)
+    end
+end
+

data/lib/deplate/mod/imgurl.rb

@@ -0,0 +1,30 @@
+# imgurl.rb
+# @Author:      Thomas Link (samul AT web.de)
+# @Website:     http://deplate.sf.net/
+# @License:     GPL (see http://www.gnu.org/licenses/gpl.txt)
+# @Created:     05-Mai-2005.
+# @Last Change: 23-Okt-2005.
+# @Revision:    0.26
+#
+# = Description
+# Insert URLs to images as image
+
+require 'deplate/wiki-markup'
+
+# Insert URLs to images as image
+class Deplate::HyperLink::ImgUrl < Deplate::Input::Wiki::AbstractImgUrl
+    insert_particle_before(Deplate::HyperLink::Url)
+    @rx = /^((file|https?|mailto|ftps?|www):(\S+?)\.(png|jpg|jpeg|gif|bmp))/
+end
+
+class Deplate::HyperLink::Extended
+    alias :process_re_imgurl :process
+    def process
+        if @dest =~ /\.(png|jpg|jpeg|gif|bmp)$/
+            @elt = @deplate.formatter.include_image(encode_path(@dest), @args, true)
+        else
+            process_re_imgurl
+        end
+    end
+end
+

data/lib/deplate/mod/inlatex-compound.rb

@@ -0,0 +1,69 @@
+# inlatex-compound.rb
+# @Author:      Thomas Link (samul AT web.de)
+# @Website:     http://deplate.sf.net/
+# @License:     GPL (see http://www.gnu.org/licenses/gpl.txt)
+# @Created:     07-Apr-2005.
+# @Last Change: 23-Okt-2005.
+# @Revision:    0.39
+#
+# = Description
+# This doesn't work yet.
+#
+# This module changes the way deplate processes inline latex fragments. 
+# By default, deplate converts each fragment for its own. When using 
+# this module, the latex fragments are collected in one file, are 
+# translated to dvi and ps, and then separated to bitmap files.
+
+class Deplate::Formatter
+    alias :inlatex_compound :inlatex
+    
+    # Process inline latex
+    def inlatex(invoker)
+        unless defined?(@inlatex_body)
+            @inlatex_body      = []
+            @inlatex_container = []
+            @inlatex_suffix    = nil
+        end
+        @inlatex_body << invoker.accum
+        @inlatex_body << %{\\newpage{}}
+        # @inlatex_body << %{\\clearpage{}}
+        rv = @inlatex_container.size
+        @inlatex_container << invoker
+        @inlatex_suffix ||= invoker.args['sfx']
+        rv
+    end
+
+    def hook_pre_process_inlatex
+        pseudo = Deplate::PseudoContainer.new(@deplate,
+                                              :accum => @inlatex_body,
+                                              :args => {'sfx' => @inlatex_suffix}
+                                             )
+        inlatex_compound(pseudo)
+        fnames = pseudo.elt
+        if fnames.size != @inlatex_container.size
+            log("Conversion if compound Inline LaTeX failed", :error)
+        else
+            @inlatex_container.each_with_index do |o, i|
+                e = fnames[i]
+                o.elt = [e]
+            end
+        end
+    end
+
+    def inlatex_process_latex(invoker, ftex, faux, flog)
+        latex2dvi(invoker, ftex, faux, flog)
+    end
+
+    def inlatex_process_dvi(invoker, fdvi, fps)
+        dvi2ps(invoker, fdvi, fps, '-i -S 1')
+    end
+
+    def inlatex_process_ps(invoker, device, fps, fout, args)
+        fin = File.basename(fps, '.*')
+        for fps in Dir["#{fin}.[0-9][0-9][0-9]"]
+            File.rename(fps, "#{fps}.ps")
+            ps2img(invoker, device, fps, fout, args)
+        end
+    end
+end
+

data/lib/deplate/mod/koma.rb

@@ -0,0 +1,109 @@
+# mod-koma.rb -- Module: use Koma-Script and friends as LaTeX class
+# @Author:      Thomas Link (samul AT web.de)
+# @Website:     http://deplate.sf.net/
+# @License:     GPL (see http://www.gnu.org/licenses/gpl.txt)
+# @Created:     07-Mai-2004.
+# @Last Change: 31-Okt-2005.
+# @Revision:    0.106
+# 
+# Description:
+# 
+# Usage:
+# 
+# TODO:
+# 
+# CHANGES:
+# 
+
+class Deplate::Formatter::LaTeX
+    @@latexDocClass = "scrartcl"
+
+    # def hook_pre_prepare_koma
+    #     push_class_option('tablecaptionabove')
+    # end
+    
+    def format_header_or_footer(invoker, left, center, right, linesep=nil)
+        args = invoker.args
+        elt = invoker.elt
+        if elt.size > 1
+            format_header_or_footer_error(elt)
+        end
+        catch :error do
+            e = elt[0]
+            if e.kind_of?(Deplate::Element::Paragraph)
+                l = c = r = nil
+                ee = wrap_text(e.elt)
+                if args["center"]
+                    c = ee
+                elsif args["right"]
+                    r = ee
+                else
+                    l = ee
+                end
+            elsif e.kind_of?(Deplate::Element::Table)
+                log("Only the header's first row will be used", :error) if e.elt.size > 1
+                l, c, r = e.elt[0].cols.collect {|c| c.cell}
+            else
+                format_header_or_footer_error(elt)
+            end
+
+            output(invoker, "\\%s{%s}" % [left, l])   if l and !l.empty?
+            output(invoker, "\\%s{%s}" % [center, c]) if c and !c.empty?
+            output(invoker, "\\%s{%s}" % [right, r])  if r and !r.empty?
+            ls = args["linesep"] || args["sep"]
+            if ls
+                if ls == true
+                    ls = "0.4pt"
+                elsif ls =~ /^[0-9.]+$/
+                    ls = "%dpt" % ls
+                end
+                output(invoker, "\\%s{%s}" % [linesep, ls])
+            end
+        end
+    end
+
+    def format_header_or_footer_error(elt)
+        elts = "%s %s" % [elt.size, elt.collect {|e| e.class}.join(", ")]
+        log(["Header must contain only 1 element (a paragraph or a table)", elts], :error)
+    end
+
+    def format_header(invoker)
+        type = invoker.doc_type(:pre)
+        slot = invoker.doc_slot(:body_pre)
+        unless @deplate.variables['__pagestyle_initialized']
+            add_package("scrpage2")
+            type, cslot, slot = format_header_or_footer_slots(type, slot)
+            output_at(type, cslot, "", %{\\clearscrheadfoot{}})
+            output_at(type, slot, %{\\pagestyle{scrheadings}}, "")
+            @deplate.variables['__pagestyle_initialized'] = true
+        end
+        format_header_or_footer(invoker, "ihead", "chead", "ohead", "setheadsepline")
+    end
+
+    def format_footer(invoker)
+        type = invoker.doc_type(:pre)
+        slot = invoker.doc_slot(:body_pre)
+        unless @deplate.variables['__pagestyle_initialized']
+            add_package("scrpage2")
+            type, cslot, slot = format_header_or_footer_slots(type, slot)
+            output_at(type, cslot, "", %{\\clearscrheadfoot{}})
+            output_at(type, slot, %{\\pagestyle{scrheadings}}, "")
+            @deplate.variables['__pagestyle_initialized'] = true
+        end
+        format_header_or_footer(invoker, "ifoot", "cfoot", "ofoot", "setfootsepline")
+    end
+
+    def format_header_or_footer_slots(type, slot)
+        if slot == :body_pre and type == :pre
+            return [type, :prematter_end, slot]
+        else
+            return [type, slot, slot]
+        end
+    end
+    
+    def format_pagenumber(invoker)
+        return "\\pagemark{}"
+    end
+end
+
+# vim: ff=unix

data/lib/deplate/mod/latex-emph-table-head.rb

@@ -0,0 +1,38 @@
+# latex-emph-table-head.rb
+# @Author:      Thomas Link (samul AT web.de)
+# @Website:     http://deplate.sf.net/
+# @License:     GPL (see http://www.gnu.org/licenses/gpl.txt)
+# @Created:     26-Nov-2004.
+# @Last Change: 23-Okt-2005.
+# @Revision:    0.39
+# 
+# Description:
+# 
+# Usage:
+# 
+# TODO:
+# 
+# CHANGES:
+# 
+
+class Deplate::Formatter::LaTeX
+    def formatter_initialize_latex_emph_table_head
+        def_advice("latex-emph-table-head", :table_end_head,
+                  :wrap => Proc.new do |agent, rv, invoker, nth|
+                    "#{rv}\n    #{table_horizontal_ruler_from_to(invoker)}"
+                  end 
+                 )
+        def_advice("latex-emph-table-head", :table_cell,
+                  :wrap => Proc.new do |agent, rv, invoker, cell, *args|
+                    hirow = args[0]
+                    hd = (hirow || cell.head || cell.foot || cell.high)
+                    if hd
+                        format_particle(:format_emphasize, invoker, rv)
+                    else
+                        rv
+                    end
+                  end 
+                 )
+    end
+end
+

data/lib/deplate/mod/latex-styles.rb

@@ -0,0 +1,461 @@
+# latex-emph-table-head.rb
+# @Author:      Thomas Link (samul AT web.de)
+# @Website:     http://deplate.sf.net/
+# @License:     GPL (see http://www.gnu.org/licenses/gpl.txt)
+# @Created:     26-Nov-2004.
+# @Last Change: 23-Okt-2005.
+# @Revision:    0.345
+# 
+# Description:
+# 
+# Usage:
+# 
+# TODO:
+# 
+# CHANGES:
+# 
+
+
+# The dummy base style
+class Deplate::Formatter::LaTeX::Styles
+    
+    def initialize(deplate)
+        @deplate   = deplate
+        @formatter = deplate.formatter
+    end
+    
+    def format_table(rv, invoker, *args)
+        rv
+    end
+
+    def table_args(rv, invoker)
+        rv
+    end
+
+    def table_bottom(rv, invoker, *args)
+        rv
+    end
+
+    def table_caption(rv, invoker, *args)
+        rv
+    end
+
+    def table_caption_text(rv, invoker, *args)
+        rv
+    end
+    
+    def table_cell(rv, invoker, *args)
+        rv
+    end
+
+    def table_cols(rv, invoker, *args)
+        rv
+    end
+
+    def table_begin_head(rv, invoker, rown)
+        rv
+    end
+    
+    def table_end_head(rv, invoker, rown)
+        rv
+    end
+    
+    def table_begin_body(rv, invoker, rown)
+        rv
+    end
+    
+    def table_end_body(rv, invoker, rown)
+        rv
+    end
+    
+    def table_begin_foot(rv, invoker, rown)
+        rv
+    end
+    
+    def table_end_foot(rv, invoker, rown)
+        rv
+    end
+
+    def table_head_row(rv, invoker, *args)
+        rv
+    end
+
+    def table_horizontal_ruler(rv, invoker, *args)
+        rv
+    end
+
+    def table_horizontal_ruler_from_to(rv, invoker, *args)
+        rv
+    end
+
+    def table_longtable_bottom(rv, invoker, *args)
+        rv
+    end
+
+    def table_longtable_top(rv, invoker, *args)
+        rv
+    end
+
+    def table_normal_row(rv, invoker, *args)
+        rv
+    end
+
+    def table_head_row(rv, invoker, *args)
+        rv
+    end
+
+    def table_foot_row(rv, invoker, *args)
+        rv
+    end
+
+    def table_high_row(rv, invoker, *args)
+        rv
+    end
+
+    def table_table_bottom(rv, invoker, *args)
+        rv
+    end
+
+    def table_table_top(rv, invoker, *args)
+        rv
+    end
+
+    def table_top(rv, invoker, *args)
+        rv
+    end
+    
+    def tabular_col_widths(rv, invoker, args)
+        rv
+    end
+    
+    def tabular_col_justifications(rv, invoker, args)
+        rv
+    end
+    
+    def tabular_vertical_rulers(rv, invoker, args)
+        rv
+    end
+
+    def table_indented_row(rv, invoker, row, indent, t)
+        rv
+    end
+    
+    protected
+    def with_agent(agent, *args)
+        @formatter.send(agent, *args)
+    end
+
+    def horizontal_ruler(invoker, rv, args={})
+        m = /^\s+/.match(rv)
+        indent = m ? m[0] : ""
+        indent + with_agent(:table_horizontal_ruler_from_to, invoker, args)
+    end
+    
+    def first_row?(invoker, rowidx)
+        rowidx == 0
+    end
+    
+    def last_row?(invoker, rowidx)
+        invoker.elt.size - 1 == rowidx
+    end
+
+    def cell_in_first_row?(invoker, cell)
+        cell.y == 1
+    end
+    
+    def cell_in_last_row?(invoker, cell)
+        cell.from_bottom - cell.span_y == 0
+    end
+    
+    def cell_in_first_column?(invoker, cell)
+        cell.x == 1
+    end
+    
+    def cell_in_last_column?(invoker, cell)
+        cell.from_right - cell.span_x == 0
+    end
+end
+
+
+# Smaller font sizes
+# class Deplate::Formatter::LaTeX::Styles::TableSmall < Deplate::Formatter::LaTeX::Styles
+#     def table_cell(rv, invoker, *args)
+#         %{\\small{#{rv}}}
+#     end
+# end
+# class Deplate::Formatter::LaTeX::Styles::TableFootnotesize < Deplate::Formatter::LaTeX::Styles
+#     def table_cell(rv, invoker, *args)
+#         %{\\footnotesize{#{rv}}}
+#     end
+# end
+# class Deplate::Formatter::LaTeX::Styles::TableScriptsize < Deplate::Formatter::LaTeX::Styles
+#     def table_cell(rv, invoker, *args)
+#         %{\\scriptsize{#{rv}}}
+#     end
+# end
+class Deplate::Formatter::LaTeX::Styles::TableSmall < Deplate::Formatter::LaTeX::Styles
+    def table_top(rv, invoker, capAbove, rown)
+        "\\small{}\n#{rv}"
+    end
+    def table_bottom(rv, invoker, capAbove, rown)
+        "#{rv}\\normalsize{}\n"
+    end
+    def table_caption_text(rv, invoker, *args)
+        "\\normalsize{#{rv}}"
+    end
+end
+class Deplate::Formatter::LaTeX::Styles::TableFootnotesize < Deplate::Formatter::LaTeX::Styles
+    def table_top(rv, invoker, capAbove, rown)
+        "\\footnotesize{}\n#{rv}"
+    end
+    def table_bottom(rv, invoker, capAbove, rown)
+        "#{rv}\\normalsize{}\n"
+    end
+    def table_caption_text(rv, invoker, *args)
+        "\\normalsize{#{rv}}"
+    end
+end
+class Deplate::Formatter::LaTeX::Styles::TableScriptsize < Deplate::Formatter::LaTeX::Styles
+    def table_top(rv, invoker, capAbove, rown)
+        "\\scriptsize{}\n#{rv}"
+    end
+    def table_bottom(rv, invoker, capAbove, rown)
+        "#{rv}\\normalsize{}\n"
+    end
+    def table_caption_text(rv, invoker, *args)
+        "\\normalsize{#{rv}}"
+    end
+end
+
+
+# Denser tables
+class Deplate::Formatter::LaTeX::Styles::TableDense08 < Deplate::Formatter::LaTeX::Styles
+    @@dense08baselinestretch = false
+    def initialize(deplate)
+        super
+        # unless @@dense08baselinestretch
+        #     @formatter.output_at(:pre, :body_beg, "\\newcommand{\\origBaseLineStretch}{}")
+        #     @@dense08baselinestretch = true
+        # end
+    end
+    def table_top(rv, invoker, capAbove, rown)
+        "\\renewcommand{\\arraystretch}{0.8}\n\\setlength{\\tabcolsep}{0.8\\tabcolsep}\n#{rv}"
+    end
+    def table_bottom(rv, invoker, capAbove, rown)
+        "#{rv}\\setlength{\\tabcolsep}{1.25\\tabcolsep}\n\\renewcommand{\\arraystretch}{1.0}\n"
+    end
+end
+
+
+# Displays tables as a box
+class Deplate::Formatter::LaTeX::Styles::TableLandscape < Deplate::Formatter::LaTeX::Styles
+    def initialize(deplate)
+        super
+        @formatter.add_package("lscape")
+    end
+    def table_top(rv, invoker, capAbove, rown)
+        "\\begin{landscape}\n#{rv}"
+    end
+    def table_bottom(rv, invoker, capAbove, rown)
+        "#{rv}\\end{landscape}\n"
+    end
+end
+
+
+# Displays tables as a grid
+class Deplate::Formatter::LaTeX::Styles::TableGrid < Deplate::Formatter::LaTeX::Styles
+    def table_bottom(rv, invoker, *args)
+        [horizontal_ruler(invoker, rv, :bottom => true), rv].join("\n")
+    end
+
+    def table_top(rv, invoker, *args)
+        [rv, horizontal_ruler(invoker, rv, :top => true)].join("\n")
+    end
+
+    def table_indented_row(rv, invoker, row, indent, t)
+        if row.from_bottom == 0
+            rv
+        else
+            [rv, horizontal_ruler(invoker, rv)].join("\n")
+        end
+    end
+    
+    def tabular_vertical_rulers(rv, invoker, *args)
+        [1] * (@formatter.table_row_size(invoker.elt) + 1)
+    end
+end
+
+
+# Displays tables as found in scientific textbooks
+# <+TBD+> We should also use booktabs.sty here
+class Deplate::Formatter::LaTeX::Styles::TableFormal < Deplate::Formatter::LaTeX::Styles
+    def table_args(rv, *args)
+        rv + %{ rules="groups"}
+    end
+    
+    def table_bottom(rv, invoker, *args)
+        [horizontal_ruler(invoker, rv, :bottom => true), rv].compact.join("\n")
+    end
+
+    def table_top(rv, invoker, *args)
+        [rv, horizontal_ruler(invoker, rv, :top => true)].compact.join("\n")
+    end
+    
+    def table_end_head(rv, invoker, *args)
+        [rv, horizontal_ruler(invoker, rv)].compact.join("\n")
+    end
+    
+    def table_begin_foot(rv, invoker, *args)
+        [horizontal_ruler(invoker, rv), rv].compact.join("\n")
+    end
+end
+
+# List
+class Deplate::Formatter::LaTeX::Styles::TableList < Deplate::Formatter::LaTeX::Styles
+    def table_bottom(rv, invoker, *args)
+        [horizontal_ruler(invoker, rv, :bottom => true), rv].compact.join("\n")
+    end
+
+    def table_top(rv, invoker, *args)
+        [rv, horizontal_ruler(invoker, rv, :top => true)].compact.join("\n")
+    end
+    
+    def table_indented_row(rv, invoker, row, indent, t)
+        if row.from_bottom == 0
+            rv
+        else
+            [rv, horizontal_ruler(invoker, rv)].join("\n")
+        end
+    end
+end
+
+# Displays tables as a box
+class Deplate::Formatter::LaTeX::Styles::TableBox < Deplate::Formatter::LaTeX::Styles::TableFormal
+    def tabular_vertical_rulers(rv, invoker, *args)
+        rv[0] = 1
+        rv[@formatter.table_row_size(invoker.elt)] = 1
+        prototype = invoker.elt[0]
+        prototype.cols.each_with_index do |c, i|
+            if c.high
+                rv[i + 1] = rv[i] = 1
+            end
+        end
+        rv
+    end
+end
+
+
+# Try some coloring
+class Deplate::Formatter::LaTeX::Styles::TableOverlay < Deplate::Formatter::LaTeX::Styles::TableBox
+    def initialize(deplate)
+        super
+        options = []
+        options << "pdftex" if deplate.options.pdftex
+        @formatter.add_package("colortbl", *options)
+    end
+
+    def table_head_row(rv, invoker, row, nth)
+        rv[0] = styled_head_row_color(rv[0])
+        rv
+    end
+
+    def table_foot_row(rv, invoker, row, nth)
+        rv[0] = styled_foot_row_color(rv[0])
+        rv
+    end
+
+    def table_cell(rv, invoker, cell, row)
+        if cell.high and !row.head and !row.foot
+            styled_high_cell_color(rv)
+        else
+            rv
+        end
+    end
+
+    def styled_head_row_color(rv)
+        %{\\rowcolor[gray]{.8}#{rv}}
+    end
+
+    def styled_foot_row_color(rv)
+        %{\\rowcolor[gray]{.9}#{rv}}
+    end
+
+    def styled_high_cell_color(rv)
+        %{\\cellcolor[gray]{.9}#{rv}}
+    end
+end
+
+
+
+class Deplate::Formatter::LaTeX
+    @style_classes = {
+        "grid"         => Deplate::Formatter::LaTeX::Styles::TableGrid,
+        "formal"       => Deplate::Formatter::LaTeX::Styles::TableFormal,
+        "box"          => Deplate::Formatter::LaTeX::Styles::TableBox,
+        "overlay"      => Deplate::Formatter::LaTeX::Styles::TableOverlay,
+        "list"         => Deplate::Formatter::LaTeX::Styles::TableList,
+        "small"        => Deplate::Formatter::LaTeX::Styles::TableSmall,
+        "footnotesize" => Deplate::Formatter::LaTeX::Styles::TableFootnotesize,
+        "scriptsize"   => Deplate::Formatter::LaTeX::Styles::TableScriptsize,
+        "dense08"      => Deplate::Formatter::LaTeX::Styles::TableDense08,
+        "landscape"    => Deplate::Formatter::LaTeX::Styles::TableLandscape,
+    }
+
+    class << self
+        attr_accessor :style_classes
+    end
+    
+    def formatter_initialize_latex_styles
+        @style_engines = {
+            :default => Deplate::Formatter::LaTeX::Styles.new(@deplate),
+        }
+
+        table_agents = [
+            :format_table, :table_args, 
+            :table_bottom, :table_caption, :table_caption_text, :table_cell, :table_cols, 
+            :table_begin_head, :table_end_head, :table_head_row, 
+            :table_begin_foot, :table_end_foot, :table_foot_row, 
+            :table_begin_body, :table_end_body, :table_high_row, :table_normal_row,
+            :table_horizontal_ruler, :table_horizontal_ruler_from_to,
+            :table_longtable_top, :table_longtable_bottom, 
+            :table_table_bottom, :table_table_top, :table_top,
+            :tabular_col_widths, :tabular_col_justifications, :tabular_vertical_rulers,
+            :table_indented_row,
+        ]
+        for agent in table_agents
+            advice = Proc.new do |agent, rv, invoker, *args|
+                styles = []
+                stylex_arg = invoker.args["stylex"]
+                if stylex_arg
+                    styles += stylex_arg.split(/\s*,\s*/)
+                else
+                    style_arg = invoker.args["style"]
+                    styles += style_arg.split(/\s*,\s*/) if style_arg
+                    style_var = @deplate.variables["tableStyle"]
+                    styles += style_var.split(/\s*,\s*/) if style_var
+                end
+                styles.compact!
+                for style in styles
+                    styler = @style_engines[style] || setup_styler(style)
+                    rv = styler.send(agent, rv, invoker, *args)
+                end
+                rv
+            end
+            def_advice("latex-styles", agent, :wrap => advice)
+        end
+    end
+
+    def setup_styler(style)
+        # <+TBD+> load module or style definition on-demand
+        c = self.class.style_classes[style]
+        if c
+            @style_engines[style] = styler = c.new(@deplate)
+            return styler
+        else
+            log(["Unknown style", style], :error)
+            @style_engines[:default]
+        end
+    end
+
+end
+