RubyGems - docgenerator - Versions diffs - 1.1.1 → 1.2.1 - Mend

docgenerator 1.1.1 → 1.2.1

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.

Files changed (179) hide show

data/lib/packages/docgenerator_beamer.rb DELETED Viewed

@@ -1,253 +0,0 @@
-#
-# The text 'Beamer' must be part of this template.
-# Without it, the title-Class will not use the short version for title.#
-#
-DocumentTemplate.new(:beamer, :latex, %q|<<prefix>>
-  % ----------------------------------------------------------------
-  % For Usage with Beamer
-  % ----------------------------------------------------------------
-  <<head>>
-  % ----------------------------------------------------------------
-  \begin{document}
-  <<body>>
-  \end{document}
-  % ----------------------------------------------------------------
-|.gsub(/^\s*/, ''))
-DocumentTemplate.new(:beamerhead, :latex, %q|<<prefix>>
-  \documentclass[<<classoptions>>]{beamer}
-  %<<theme>>
-  \usepackage{babel}
-  \usepackage[ansinew]{inputenc}
-  \usepackage{beamertool}
-  \usepackage{hyperref}
-  % ----------------------------------------------------------------
-  <<head>>
-|.gsub(/^\s*/, ''))
-[
-  :beamerthemebars, :beamerthemeboxes, :beamerthemeclassic,
-  :beamerthemelined, :beamerthemeplain, :beamerthemesidebar,
-  :beamerthemesidebardark, :beamerthemesidebardarktab,
-  :beamerthemesidebartab, :beamerthemesplit,
-  :beamerthemesplitcondensed, :beamerthemetree,
-  :beamerthemevcd,
-  :beamerthemegemeinschaftsauto
-].each{ |theme|
-  DocumentTemplate.new(theme, :latex, DocumentTemplate[:beamerhead].template.sub(/%<<theme>>/, "\\usepackage{#{theme}}"))
-}
-DocumentTemplate.new(:beamerarticle, :latex, %q|<<prefix>>
-  \documentclass[class=scrartcl,<<classoptions>>]{beamer}
-  \usepackage{babel}
-  \usepackage{beamerbasearticle}
-  \usepackage[article]{beamertool}
-  \usepackage[ansinew]{inputenc}
-  \usepackage{hyperref}
-  % ----------------------------------------------------------------
-  <<head>>
-|.gsub(/^\s*/, ''))
-#Define TeX-Kommands
-#frame -- environment.
-#options
-#~ Element.create( :frame, {}, true, {
-  #~ :latex => '#{linebreak(@crbefore)}\frame{#{@content}}#{linebreak(@crafter)}'
-  #~ } )
-class Frame < Element
-  add_attributes( {
-    :options	=> Attribute.create( [ :latex ], [nil, 'fragile', 't', 'b'] ),
-  }.update( HTML_ATTR_ALL ) )
-  Element.add( [:frame],  Frame)
-  #Returns a div-element.
-  #The class for the css is set to 'frame' (if not defined before).
-  def htmltag( )
-    if @attr[:class].content.empty?
-      @attr[:class]	<< :frame
-    end
-    'div'
-  end
-  def to_latex( options = {} )
-    option	= "[#{@attr[:options].content.join(',')}]"
-    option	= nil if option == '[]'
-    label = nil
-    label = element(:label,{:name => @attr[:id]}).cr.to_latex(options) unless @attr[:id].content.empty?
-    #~ return "#{linebreak(@crbefore)}\\frame#{option}{\n#{@content}}#{linebreak(@crafter)}"
-    return "#{linebreak(@crbefore)}\\begin{frame}#{option}\n#{label}#{@content.to_latex(options)}\n\\end{frame}#{linebreak(@crafter)}"
-  end
-end
-#
-#Frametitle.
-#Can be changed by
-#	Element.get( :frametitle ).class_eval( "def htmltag(); 'h4'; end")
-Element.create( :frametitle, { }, true, {
-  :latex	=> '#{linebreak(@crbefore)}\frametitle{#{@content}}#{linebreak(@crafter)}',
-  :htmltag	=> 'p', #'h4',
-  :html	=> '#{linebreak(@crbefore)}<#{htmltag} class = "frametitle">#{@content}</#{htmltag}>#{linebreak(@crafter)}',
-  } )
-Element.create( :block, {
-    :title	=> Attribute.create( [ :latex ] ),
-  }, true, {
-    :latex => '#{linebreak(@crbefore)}' + '\begin{block}{#{@attr[:title]}}' + '#{linebreak(@crmid)}' + '#{@content}\end{block}' + '#{linebreak(@crafter)}'
-  } )
-#
-# Notes in Beamer.
-#
-Element.create( :note, { }, true, {
-  :latex	=> '#{linebreak(@crbefore)}\note{#{@content}}#{linebreak(@crafter)}',
-  :htmltag	=> 'p', #'h4',
-  :html	=> '#{linebreak(@crbefore)}<#{htmltag} class = "note">#{@content}</#{htmltag}>#{linebreak(@crafter)}',
-  } )
-#\framePic{filename}{
-#	description
-#}
-#~ Element.create( :framepic, {	:file	=> Attribute.create( [ :required ] ),
-          #~ :link	=> Attribute.create( )
-        #~ }, true, {
-  #~ :latex => '\framePic{#{@attr[:file]}}{#{@content}}'
-  #~ } )
-Element.create( :institute, {
-  }, true, {
-    :latex => '#{linebreak(@crbefore)}' + '\institute{#{@content}}' + '#{linebreak(@crafter)}'
-  } )
-Element.create( :subtitle, {
-  }, true, {
-    :latex => '#{linebreak(@crbefore)}' + '\subtitle{#{@content}}' + '#{linebreak(@crafter)}'
-  } )
-begin
-#define Knut::Picture
-require 'knut_picture'
-rescue
-  #Define Knut::Picture with reduced functionality
-  module Knut
-  class Picture
-    def initialize( filename )
-      @filename		= filename
-      @basename	= File.basename(@filename)
-      @dir				= File.dirname(@filename)
-      if ! File.exists?( @filename )
-        puts "#{self.class}: #{@filename} not found"
-      else
-        @size			= File.size(@filename)
-        @sizekb		= @size / 1024
-      end
-    end
-    #Filename including the path
-    attr_reader :filename
-    #Directory of the picture
-    attr_reader :dir
-    attr_reader :basename
-    def tech_description()
-      "#{@basename} (#{@sizekb}KB)"
-    end
-  end
-  end
-end
-class Framepic < Element
-  Element.add( [:framepic],  Framepic)
-  add_attributes( {
-          :file			=>	Attribute.create( [ :required ] ),
-          :link			=>	Attribute.create( [ :latex ]),  #Hyperlink
-        }.update( HTML_ATTR_ALL ) )
-  #container for the picture
-  def picture()
-    @picture = Knut::Picture.new( @attr[:file].content.first ) if ! @picture
-    @picture
-  end
-  attr_accessor :div_css
-  attr_accessor :img_css
-  attr_accessor :div_class
-  attr_accessor :img_class
-  attr_accessor :picwithname
-  def to_html( options = {})
-    html = []	#element(:div, {:class => :framepic })
-    #~ if @attr[:link].content.size > 0
-      #~ html << "[#{@attr[:link]}]"
-    #~ end
-    html << div_img	= element(:div ).CR
-    if self.picture.href
-      div_img	<< element(:a, { :href => self.picture.href },
-                    img = element(:img )
-                )
-    else
-      div_img	<< img = element(:img )
-    end
-    if self.picture.thumbname	and self.picture.usethumb?
-      img[:src] << self.picture.thumbname
-    else
-      img[:src] << self.picture.filename
-    end
-    @div_css	 = CSS.new() if ! @div_css
-    div_img[:class]	<< @div_class if @div_class
-    div_img[:style]	<< @div_css
-    div_img[:align]	<< 'center'	if div_img[:align].content.empty?
-    img[:class]		<< @img_class if @img_class
-    img[:style]		<< @img_css	if @img_css
-    if picwithname
-      div_img	<< element(:br ).cr
-      div_img	<< element(:footnotesize, {}, self.picture.tech_description)
-    end
-    html	<< @content
-    return html.to_html(options)
-  end
-  def to_latex( options = {} )
-    result = ""
-    result << "\n" if @crbefore
-    result << "\\framePic"
-    if self.div_css	#Check alignment
-      case self.div_css[:float]
-        when nil, 'left'	#standard
-        when 'right'
-          result << "[right]"
-        else
-          puts "#{__FILE__}##{__LINE__}: Undefined float '#{self.div_css[:float]}' for TeX"
-        end
-    end
-    result << "{#{self.picture.filename}}"
-    if @attr[:link].content.size > 0
-      result << "[#{@attr[:link]}]"
-    end
-    result << "{"
-    result << "\n" if @crmid
-    result << "#{@content.to_latex(options)}"
-    result << "\n" if @crmid
-    result << "}"
-    result << "\n" if @crafter
-    return result
-  end
-end
-Element.create( :includegraphicsJustified, {}, true, {
-  :latex	=> '\includegraphicsJustified{#{@content}}',
-  :html	=> '<img src = "#{@content}" style = "max-width: 80%" />',
-  } )
-#fixme --> docgenerator_color ?
-class Textcolor < Element
-  Element.add( [:textcolor],  Textcolor)
-  add_attributes( {	:mode	=> Attribute.create( [ :required ], [:rgb] ),
-          :color	=> Attribute.create( [ :required ], [String] ),
-        } )
-  def to_latex( options = {})
-    result = ""
-    result << "\n" if @crbefore
-    result << "\\textcolor[#{attr[:mode]}]{#{@attr[:color]}}"
-    result << "\n" if @crmid
-    result << "{"
-    result << "#{@content.to_latex(options)}"
-    result << "\n" if @crmid
-    result << "}"
-    result << "\n" if @crafter
-    return result
-  end
-end

data/lib/yaml2presentation/yaml2presentation.rb DELETED Viewed

@@ -1,1091 +0,0 @@
-#~ fixmes:
-#~ Frame: puts in log umsetzte
-#~ require 'docgenerator'
-require 'wiki2doc/wiki2docgenerator.rb'
-require 'creole/creole2doc.rb'
-require 'packages/docgenerator_beamer.rb'
-require 'yaml'
-#Analyse Wiki-text inside a frame.
-class WikiFrame  < Wikitext
-  def wiki_macro( macro, parameters )
-    case macro
-      #Special feature, requires additional scripts.
-      when 'note'
-        element(:note,{}, parameters)
-      when 'rail'
-        raise "require rails parts" if ! Rail_diagramm
-        Rail_diagramm[parameters.to_sym]
-      else
-        super(macro, parameters)
-    end
-  end
-end
-#Redefinition of docgenerator-Frame class (or better extension.)
-#
-#Generell Problems:
-#-no lists outside a frame for LaTeX-Output
-#-frames with verbatim must contain the option ''fragile''
-class Frame
-  attr_accessor  :title
-  attr_accessor  :html_link
-  #Filename of a preview thumb
-  attr_reader  :thumb
-  attr_accessor  :framepic
-  attr_accessor  :picname
-  attr_accessor  :key
-  #Settings of Presentation
-  #contains things like "picwithframe"
-  attr_accessor  :settings
-  #Presentation, where frame is part of.
-  #Used to add detail pages of pictures
-  attr_accessor  :presentation
-  #Add a picture to the frame
-  def pic=( picname )
-    if ! File.exist?(picname)
-      @log.error("Picture #{picname} missing") if @log.error?
-    end
-    @picname  = picname
-    self << @framepic  = Framepic.new( { :file => picname } )
-    @framepic.picture.thumbname = @thumb if @thumb
-    return @framepic
-  end
-  #Add a picture with link to a 'fullpage-mode'.
-  def picfull=( picname )
-    self.pic= picname
-    if self.presentation
-      self.presentation.attachment << picname
-      @framepic[:link] << "pic:#{picname}"
-    end
-    #not really functional. Is set later again with beamer_save
-    @framepic.picwithname = @settings[:picwithname]
-  end
-  #Add a picture in 'fullpage-mode'.
-  def piconly=( picname )
-    if ! File.exist?(picname)
-      @log.warn("Picture #{picname} missing")if @log.warn?
-    end
-    @picname  = picname
-    self << element(:includegraphicsJustified, {}, picname)
-    #~ return @framepic
-  end
-  def thumb=( thumbname )
-    raise "Thumb without picture (#{title}" if ! @framepic
-    if ! File.exist?(thumbname)
-      @log.warn("Thumb #{thumbname} missing") if @log.warn?
-    end
-    @thumb  = thumbname
-    @framepic.picture.thumbname = thumbname if @framepic.picture
-  end  #Add option.
-  #CSS-options for surrounding div
-  def pos=( pos )
-    if ! @framepic
-      @log.warn("Set pos #{pos} for undefined picture in #{@title}") if @log.warn?
-      return false
-    end
-    @framepic.div_css  = CSS.new() if ! @framepic.div_css
-    case pos
-      when 'left', 'right'
-        @framepic.div_css[:float]  = pos
-        @framepic.div_css[:padding]  = '10px'
-      when 'top', 'bottom'
-        @framepic.div_css[:float]  = 'none'
-      else
-        @log.warn("Undefined option #{pos} in #{@title}") if @log.warn?
-    end
-  end  #pos=
-  #Set picture width
-  def picwidth= (width )
-    if ! @framepic
-      @log.warn("Set width for undefined picture in #{@title}") if @log.warn?
-      return false
-    end
-    @framepic.img_css  = CSS.new() if ! @framepic.img_css
-    @framepic.img_css[:width]  = width
-  end
-  def framepicratio=( value )
-    vals = value.strip.split(/[,;]/)
-    vals.each{|val|
-      case val
-        when /\d*\.\d+/
-        else
-          @log.warn("Wrong ratio #{val} given with #{value}") if @log.warn?
-      end
-    }
-    @framepicratio = "\\framepicratio{#{vals[0]}}{#{vals[1]}}\n"
-  end
-  def img_class=( value )
-    if ! @framepic
-      @log.warn("Set width for undefined picture in #{@title}") if @log.warn?
-      return false
-    end
-    @framepic.img_class = value
-  end
-  #Set CSS-class for the div
-  def html_class=( value )
-    if ! @framepic
-      @log.warn("Set #{key} for undefined picture in #{@title}") if @log.warn?
-      return false
-    end
-    @framepic.div_class = value
-  end
-  def fragile=( value );
-    self[:options]  << 'fragile'
-  end
-  #Alignment top/bottom of page
-  def alignment= (value)
-    case value
-      when 't', 'b'
-        self[:options]  << value
-      else
-        @log.warn("Undefined alignment #{value} (allowed: t/b)" ) if @log.warn?
-    end
-  end
-  #If there is a pic, move the content of the frame to the content of the pic.
-  def rearrange_content()
-    newcontent = []
-    @content.each{|e|
-      if e.is_a?(:framepic) or e.is_a?(:frametitle)
-          newcontent << e
-        else
-          @framepic  << e
-      end
-    }
-    return newcontent
-  end
-  def to_doc(target, options = {})
-    if self.key and @attr[:id].content.empty?
-      @attr[:id] << self.key
-    end
-    super
-  end
-  #Store old logic of to_latex
-  alias :old_to_latex :to_latex
-  #Move content into TeX-Macro.
-  #Not nice, but so we can use << in frame and don't need an additional step.
-  def to_latex(options = {})
-    @content = rearrange_content() if @framepic
-    @content.unshift(@framepicratio) if @framepicratio
-    old_to_latex(options)
-  end
-  #~ def to_html(options = {})
-    #~ if self.key and @attr[:id].content.empty?
-      #~ @attr[:id] << self.key
-    #~ end
-    #~ super
-  #~ end
-end  #Frame
-#Class to create
-#-Presentation (Using beamer-class for LaTeX)
-#
-class Presentation
-  #Little elp for me.
-  #Avoid the automatic generation of TeX-Entries
-  EMPTYBIBTEX = "\n%BibTeX-Entry>\n%BibTeX-Entry<\n"
-  #
-  #Defaults settings for Presentation, used in Presentation#save_beamer.
-  #
-  DEF_SETTINGS  = {
-        #Values for Document
-        :template  => :emptyTemplate,
-        :splitscreen => nil,
-        :language  => ['ngerman'],  #Default
-        :author    => nil,
-        :defaultoptions  => {},  #Defaults for each frame
-        :wikiframe => WikiFrame,  #Wiki-type
-        #~ :shortauthor  => nil,
-        :institute  => nil,
-        :date    => nil,
-        :shorttitle  => nil,
-        :subtitle  => nil,  #used for beamer
-        :logo      => nil,
-        :maketitle  => nil,
-        :maketoc  => nil,
-        :keywords  => nil,    #copied to @keywords
-        :description=> nil,  #copied to @description
-        :id      => nil,  #copied to @description
-        :altlang    => nil,  #copied to @description
-        #Outputs (true, nil)
-        :presentation    => false,
-        :beamer_article  => false,
-        :beamer_notes  => false,  #one value of BEAMER_NOTES
-        :beamer_include=> false,
-        :html        => false,#valid parameter: true, :overview_with_singlepages, :with_detailpic :with_detailpic_and_text
-        :pdftk        => false,#Additional pdftk-process
-        #Options for TeX
-        :runtex        => false,
-        :fullpage      => false,
-        #Picture name under picture
-        :picwithname  => false,
-        :classoption    => [],
-        :log              => Log4r::Logger.new( 'presentation', Log4r::WARN ),
-        #Valid keys - suppress the "Unknown key"-Warning for additional keys.
-        :valid_keys   => []
-  }
-  DEF_SETTINGS[:log].outputters = Log4r::StdoutOutputter.new('Presentation')
-  #show  - Include notes in the output file. Normal slides are also included.
-  #only    - Include only the notes in the output file and suppresses all frames.
-  #onlyslideswithnotes  - This includes all notes and those slides that contain a \note.
-  BEAMER_NOTES = [
-    'show',               #Normal presentation, including notes pages
-    'only',               #only notes pages
-    'onlyslideswithnotes',  #Normal page and notes page, only pages with comments
-    ]
-  #Option splitscreen/Taking Advantage of Multiple Screens
-  BEAMER_SPLIT_POSITIONS = [
-    'right',
-    'left',
-    'top',
-    'bottom',
-  ]
-  #Define a presentation/picture galery
-  def initialize(  title, settings = {})
-    @title  = title
-    @settings    = DEF_SETTINGS.merge(settings)
-    @log = @settings[:log]
-    @log.info("Build Presentation #{title}") if @log.info?
-    @head  = []
-    @attachment  = []
-    @content    = []
-    @frames    = []  #u.a. f�r Navigation
-    @bibtex    = nil
-    @description  = @settings[:description]
-    @keywords  = @settings[:keywords]
-    #~ log.level = Log4r::ERROR
-    #~ log.level = Log4r::DEBUG
-    #~ log.outputters = Log4r::StdoutOutputter.new('test_document_toc')
-    if ! [WikiFrame, Creole].include?(@settings[:wikiframe])
-        @log.error("Wrong type for wikiframe (#{@settings[:wikiframe]})") if @log.error?
-    end
-  end
-  attr_accessor  :title
-  #Some global settings.
-  #Can be set via macros in WikiPresentation.
-  #Allowed values, see method check_settings
-  attr_reader  :settings
-  #Attachments.
-  #Contains "big" pictures
-  attr_accessor  :attachment
-  #Additional heading information.
-  #Is a list.
-  attr_reader  :head
-  #Definition for a bibtex-entry
-  attr_accessor  :bibtex
-  attr_accessor  :keywords
-  attr_accessor  :description
-  #Logger for the presentation
-  attr_reader  :log
-  #Allowed keys and methods to be called.
-  #:main is a dummy method
-  KEYS = {
-    'section'        => :main,
-    'sectionshort'    => :main,
-    'subsection'    => :main,
-    'subsectionshort'=> :main,
-    'title'        => :main,
-    'wiki'          => :main,
-    'notes'        => :main,
-    'restrict'      => :main,  #Allowed values: :latex, :html
-    'thumb'    => :thumb=,
-    'pic'      => :pic=,
-    'pic*'      => :picfull=,
-    'PIC'      => :piconly=,
-    'picwidth'  => :picwidth=,
-    'pos'      => :pos=,
-    'alignment'  => :alignment=,
-    'fragile'    => :fragile=,
-    'key'      => :key=,
-    'html_class'=> :html_class=,
-    'img_class'  => :img_class=,
-    'framepicratio'  => :framepicratio=,
-  }
-  #Add contents to Presentation.
-  #fixme2yaml
-  def <<(input)
-    data = input
-    data = YAML.load(input) if input.is_a?( String ) or input.is_a?( File )
-    data = [data]  if input.is_a?( Hash )
-    raise "Wrong datatype in Presentation << (#{input.class}, converted to #{data.class}" if ! data.is_a?(Array)
-    data.each{|properties|
-      props = @settings[:defaultoptions].merge(properties)
-      if props['section']
-        @content << element(:section, {}, props['section']).cr
-        if props['sectionshort']
-        @content.last[:short] << props['sectionshort']
-        end
-      end
-      if props['subsection']
-        @content << element(:subsection, {}, props['subsection']).cr
-        if props['subsectionshort']
-        @content.last[:short] << props['subsectionshort']
-        end
-      end
-      #Add in frames
-      @content  << frame  = element(:frame, :log => @log).CR
-      @frames  << frame
-      frame.presentation = self
-      frame.settings = @settings
-      frame.restrict_to(props['restrict']) if props['restrict']
-      if props['title']
-        frame.title = props['title']
-        frame  << element(:frametitle, {}, frame.title ).cr
-      else
-        @log.error("No title available(#{props.inspect})") if @log.error?
-      end
-      #Call methods for settings.
-      #The sequence is important (thumb, pos... requires a pic.
-      [  "pic", "pic*", "PIC", "thumb",
-        "pos", "picwidth",
-        "fragile", "alignment",
-        "key",
-        "html_class", "img_class",
-        "framepicratio"
-      ].each{|key|
-        if props[key]
-          frame.send( KEYS[key], props[key] )
-        end
-      }
-      frame  <<  @settings[:wikiframe].new(:content => props['wiki']) if props['wiki']
-      if props['notes']
-        frame  <<  element(:note,{},
-                    @settings[:wikiframe].new(:content => props['notes'])
-                    )
-      end
-      #Check for unknown parameters (Typo?)
-      (props.keys - KEYS.keys - @settings[:valid_keys]).each{|key|
-        @log.warn("Unknown key '#{key}' in #{props.inspect}") if @log.warn?
-      }
-      @content  << element(:newline, {:clear=>'all'}).restrict_to(:html).cr
-    }
-    return self
-  end
-  #The result are different files:
-  #-The presentation content (beamer_include)
-  #-The article version
-  #-the beamer version
-  #-the notes version
-  #-the HTML version
-  #The flags are used to write "true" to the documentsettings.
-  #-runtex (:pdflualatex, :latex, :pdflatex, :xelatex)
-  #-fullpage
-  def save( filename, *args )
-    settings  = DEF_SETTINGS.dup.update(@settings)
-    args.flatten.each{|arg|
-      if arg.is_a?(Hash)  #max. einmal, letzte Element
-        settings.update(arg)
-      else
-        settings[arg] = true
-      end
-    }
-    #check settings
-    settings[:beamer_include] = ( settings[:presentation] or settings[:beamer_article] or settings[:beamer_notes] )
-    if ! (settings.keys - DEF_SETTINGS.keys).empty?
-      puts "Undefined setting #{(settings.keys - DEF_SETTINGS.keys ).inspect}"
-    end
-    @content.each{|frame|
-      next if ! frame.is_a?(Frame)
-      frame.settings = settings
-      frame.framepic.picwithname = settings[:picwithname] if settings[:picwithname] and frame.framepic
-    }
-    #fixme: Parameter zum setzen.
-    overwrite  = true
-    dir  = File.dirname(filename)  + '/'
-    filename_base = File.basename(filename, '.tex')
-    filename_html  =  "#{filename_base}.html"
-    filename_tex    =  "#{filename_base}.tex"
-    filename_pres  =  "#{filename_base}_screen.tex"
-    filename_artcl  =  "#{filename_base}_print.tex"
-    filename_note  =  "#{filename_base}_notes.tex"
-    filename_att    =  "#{filename_base}_attachment.tex"
-    settings[:filename_att] = filename_att
-    document = build_document(settings)
-    attachment = build_attachment_doc(settings) if @attachment.size > 0
-    presentation = nil
-    presentation = build_presentation(filename, settings) if settings[:presentation]
-    article = nil
-    article = build_article(filename, settings) if settings[:beamer_article]
-    notes = nil
-    notes = build_notes(filename, settings) if settings[:beamer_notes]
-    #Save HTML
-    #~ Parameter zum einstellen:
-    #~ �bersicht mit
-    #~ -text
-    #~ -bild
-    #~ -link zu detail
-    #~ detail mit
-    #~ -bild
-    #~ -text
-    #~ -Aufbau Filename
-    case settings[:html]
-    #Overview contains the title and a link to the detail page
-    when :overview_with_singlepages
-      html_overview = build_html_overview_with_singlepages(dir, filename_html, settings)
-      html_overview.save(   dir + filename_html,  :overwrite => overwrite )
-    #Overview containes picture-thumb and text.
-    #The thumb is linked to a html with picture
-    when  :with_detailpic, :with_detailpic_and_text
-      #Build all picture-HTMLS, named with numbers
-      build_html_with_detailpic(filename_html, settings)
-      document.save(   dir + filename_html,  :overwrite => overwrite )
-    when true
-      document.save(   dir + filename_html,  :overwrite => overwrite )
-    when false  #No action
-    else
-      @log.error("Unknown feature for :html (#{@option[:html]}, #{__FILE__}##{__LINE__})") if @log.error?
-    end
-    #Save TeX/Beamer-class
-    changed = false
-    changed = true if document.save(   dir + filename_tex,  :overwrite => overwrite )  if settings[:beamer_include]
-    changed = true if presentation.save(  dir + filename_pres,  :overwrite => overwrite )  if presentation
-    changed = true if article.save(      dir + filename_artcl,  :overwrite => overwrite )  if article
-    changed = true if notes.save(      dir + filename_note,  :overwrite => overwrite )  if notes
-    changed = true if attachment.save(  dir + filename_att,    :overwrite => overwrite )  if attachment
-    if settings[:runtex]
-      if changed
-        Document.runtex( filename_pres, settings[:runtex] )  if presentation
-        Document.runtex( filename_artcl, settings[:runtex] )  if article
-        Document.runtex( filename_note, settings[:runtex] )  if notes
-      else
-        @log.info('No TeX-call (no change in documents)') if @log.info?
-      end
-    end  #runtex
-    if pdftk = settings[:pdftk]
-      pdftk_base = filename_pres.gsub(/\.tex/, '')
-      call_pdftk( "#{pdftk_base}.pdf", "#{pdftk_base}2.pdf", settings[:pdftk])
-    end
-  end  #save_beamer
-  #
-  #Build the content of the presentation.
-  #Will be included to the different main documents.
-  def build_document(settings)
-    document = Document.new(
-      :template => :beamer,
-      :title => title,
-      :shorttitle => settings[:shorttitle],
-      :log  => @log
-      )
-    document.description    =  @description
-    document.keywords    =  @keywords
-    if @bibtex
-    document.head << EMPTYBIBTEX.sub(/>\n/, ">\n%#{@bibtex.gsub(/\n/, "\n%")}\n")
-    else  #Avoid the automatic generation of BibTeX-Entries
-    document.head << element(:span,{},EMPTYBIBTEX).restrict_to(:latex)
-    end
-    if settings[:author].respond_to?(:join)
-      document.author  = settings[:author].join(', ')
-    elsif settings[:author]
-      document.author  = settings[:author]
-    end
-    document.head<< element(:institute, {}, settings[:institute]) if settings[:institute]
-    document.date    = settings[:date]  if settings[:date]
-    #~ document.logo    = settings[:logo]  if settings[:logo]
-    [ :id, :altlang ].each{|setting|
-      document.meta( setting, settings[setting]) if settings[setting]
-    }
-    document.head << element(:subtitle, {}, settings[:subtitle]).restrict_to(:latex)  if settings[:subtitle]
-    document.body << element(:maketitle).cr if settings[:maketitle]
-    case settings[:maketoc]
-      when true
-        document.body << element(:tableofcontents).cr
-      when :article
-        document.body << [
-            '\only<article>{',
-            element(:tableofcontents),
-            "}\n"
-            ]
-    end  #settings[:maketoc]
-    document.body << @content
-    #Collection of attachments
-    if @attachment.size > 0
-      document.body << element(:span,{},[ '\only<presentation>{',
-        %q|
-          \appendix
-        |.gsub(/^\t*/, ''),
-        element(:input,{}, settings[:filename_att] ).cr,
-        '}%Big Pictures' ]
-        ).restrict_to(:latex)
-    end
-    return document
-  end #build_document
-  #
-  #Build the include to be attached at the end.
-  #This document contains the full-page pictures.
-  def build_attachment_doc(settings)
-      attachment  = Document.new(:template => :include, :log  => @log)
-      attachment.head << EMPTYBIBTEX
-      attachment.body << %q|
-          %
-          % Big Pictures / Plainframes
-          \section{Enlarged Pictures}%\frame{\sectionpage}
-          \usebackgroundtemplate{}
-        |.gsub(/^\t*/, '')
-      @attachment.each{|picname|
-        attachment.body << <<-FRAME
-        \\frame<handout:0>[plain]{%\\frametitle{#{picname}}
-          \\hypertarget{pic:#{picname}}{}
-          \\includegraphicsJustified{#{picname}}
-          }
-          FRAME
-      }
-      return attachment
-  end #build_attachment_doc
-  #
-  #Build the main-tex-document for presentation.
-  def build_presentation(filename, settings)
-    presentation = Document.new( :template => @settings[:template], :log  => @log )
-    if settings[:language].respond_to?(:join)
-      presentation.language  = settings[:language].join(',')
-    elsif !settings[:language]
-      presentation.language  = 'ngerman'
-    else
-      presentation.language  = settings[:language]
-    end
-    presentation.add_option(:picwithname)  if settings[:picwithname]
-    presentation.add_option( settings[:classoption] )    if settings[:classoption]
-    #~ @classoptions.each{|opt| presentation.add_option( opt ) }
-    presentation.head << EMPTYBIBTEX
-    if settings[:fullpage]
-      presentation.head << "\\hypersetup{\n"
-      presentation.head << "\tpdfpagemode=FullScreen,\n"
-      presentation.head << "}\n"
-    end
-    presentation.head << @head
-    presentation.head << element(:input, {}, filename).cr
-    presentation
-  end #def build_presentation
-  #
-  #Build the main-tex-document for article.
-  def build_article(filename, settings)
-    if @settings[:template].to_s =~ /festo/i
-      article = Document.new( :template => :beamerFestoarticle, :log  => @log )
-    else
-      article = Document.new( :template => :beamerarticle, :log  => @log )
-    end
-    article.head << EMPTYBIBTEX
-    article.head << @head
-    article.head << "\\input{#{filename}}\n"
-    article.language  = settings[:language].join(',')
-    article.add_option(:picwithname)  if settings[:picwithname]
-    article.add_option( settings[:classoption] )    if settings[:classoption]
-    return article
-  end #build_article
-  #
-  #Build the main-tex-document for notes.
-  #
-  #The following settings are possible:
-  #- show  - Include notes in the output file. Normal slides are also included.
-  #- only    - Include only the notes in the output file and suppresses all frames.
-  #- onlyslideswithnotes  - This includes all notes and those slides that contain a \note.
-  def build_notes(filename, settings)
-    settings[:beamer_notes] = 'only' if settings[:beamer_notes] == true
-    if ! BEAMER_NOTES.include?(settings[:beamer_notes])
-      @log.error("Beamer_Notes settings: unknown #{settings[:beamer_notes].inspect} - use #{BEAMER_NOTES.inspect}") if @log.error?
-    end
-    #~ notes = Document.new( :template => DocumentTemplate[settings[:template]].sub(/<<classoptions>>/, "notes=#{settings[:beamer_notes]},<<classoptions>>") )
-    notes = Document.new( :template => DocumentTemplate[settings[:template]], :log  => @log )
-    notes.add_option("notes=#{settings[:beamer_notes]}")
-    notes.head << EMPTYBIBTEX
-    notes.head << @head
-    if settings[:splitscreen]
-      if ! BEAMER_SPLIT_POSITIONS.include?(settings[:splitscreen])
-        @log.error("Undefined option for splitscreen, use 'right'. (allowed: #{BEAMER_SPLIT_POSITIONS.inspect})") if @log.error?
-        settings[:splitscreen] = 'right'
-      end
-      if settings[:beamer_notes] != 'show'
-        @log.info("Use splitscreen without all frames") if @log.info?
-      end
-    notes.head << <<SPLITSCREEN
-\\usepackage{pgfpages}
-\\setbeameroption{show notes on second screen=#{settings[:splitscreen]}}
-SPLITSCREEN
-    end
-    notes.head << "\\input{#{filename}}\n"
-    notes.language  = settings[:language].join(',')
-    notes.add_option(:picwithname)  if settings[:picwithname]
-    notes.add_option( settings[:classoption] )    if settings[:classoption]
-    return notes
-  end #build_notes
-  #Overview contains the title and a link to the detail page
-  def  build_html_overview_with_singlepages(dir, filename_html, settings)
-    #Links needed for navigation
-    @frames.each_with_index{|frame,count|
-      if frame.key
-        frame.html_link  = filename_html.sub(/\.htm/, "_#{frame.key}.htm" )
-      else
-        frame.html_link  = filename_html.sub(/\.htm/, "_#{count}.htm" )
-      end
-    }
-    #Build single files.
-    Knut::Picture.usethumbs  = false
-    @frames.each_with_index{|frame,count|
-      singleframe = Document.new()
-      singleframe.title  = frame.title
-      singleframe.body << html_navigation( count, filename_html )
-      singleframe.body << frame
-      singleframe.body << html_navigation( count, filename_html )
-      singleframe.save(   dir + frame.html_link,  :overwrite => true )
-    }
-    Knut::Picture.usethumbs  = true
-    #Build main-File
-    html_overview  = Document.new( :log  => @log)
-    html_overview.title = title
-    html_overview.description  =  @description
-    html_overview.keywords    =  @keywords
-    [ :shorttitle, :id, :altlang ].each{|setting|
-      html_overview.meta( setting, settings[setting]) if settings[setting]
-    }
-    @content.each{|frame|
-      if frame.is_a?(Frame)
-        html_overview.body  << element(:p,{},[
-            element(:Rightarrow),
-            preview = element(:a,{:href=>frame.html_link}, frame.title)
-          ]).cr
-        #Add thumb
-        if frame.thumb
-            preview << element(:br )
-            preview << element(:img,{ :src =>frame.thumb} )
-        end
-      else
-        html_overview.body  << frame
-      end
-    }
-    return html_overview
-  end #build_html_overview_with_singlepages
-  #Build all picture-HTMLS, named with numbers
-  def build_html_with_detailpic(filename_html, settings)
-    @frames.each_with_index{|frame,count|
-      filename   = frame.title
-      if frame.framepic
-        filename = File.basename(frame.framepic.picture.filename, '.jpg')
-        #~ filename.gsub!(/\.(jpg|png)/i, '')
-        frame.framepic.picture.href = "./#{filename}.html"
-        frame.framepic.picture.title  = frame.title
-      end
-      frame.html_link = "#{filename}.html"
-    }
-    #Save all HTML for Pictures
-    @frames.each_with_index{|frame,count|
-      next if ! frame.framepic
-      post = []
-      case settings[:html]
-      # only navigation
-      when :with_detailpic
-        post << html_navigation( count, filename_html )
-      # complete content added (Preview + Text
-      when :with_detailpic_and_text
-        frame.content.each{|c|
-          #0=Titel
-          #1=framepic
-          #2=Description in Array
-          case c
-            when Framepic, element(:frametitle).class
-            when Array, WikiFrame, Creole
-              post << c
-            else
-              #~ puts #{__FILE__}##{__LINE__} c.class, c.inspect
-          end
-        }
-        post << html_navigation( count, filename_html )
-      end
-      frame.framepic.picture.html(
-            :filename  => frame.html_link,
-            :id      => settings[:id]    ? "#{File.basename(frame.html_link, 'html')}#{settings[:id]}" : nil,
-            :altlang    => settings[:altlang] ? "#{File.basename(frame.html_link, 'html')}#{settings[:altlang]}" : nil,
-            :pre  => html_navigation( count, filename_html ),
-            :post  => post
-          )
-    }
-  end #build_html_with_detailpic
-  alias :save_beamer :save
-  #
-  def call_pdftk(source, output, pdftksettings)
-    (pdftksettings.keys - [:owner_pw, :user_pw, :allow] ).each{|opt|
-      puts "PDFTK: Undefined option #{opt.inspect}"
-    }
-    pdftkcmd = ["pdftk #{source}"]
-    #~ pdftk << "output #{pdftk_base}_save.pdf"
-    pdftkcmd << "output #{output}"
-    pdftkcmd << "owner_pw #{pdftksettings[:owner_pw]}"  if pdftksettings[:owner_pw]
-    pdftkcmd << "user_pw #{pdftksettings[:user_pw]}"    if pdftksettings[:user_pw]
-    if pdftksettings[:allow]
-      ([pdftksettings[:allow]].flatten - [
-          'Printing', 'DegradedPrinting',
-          'ModifyContents', #                     Also allows Assembly
-          'Assembly',
-          'CopyContents', #Also allows ScreenReaders
-          'ScreenReaders',
-          'ModifyAnnotations',  #Also allows FillIn
-          'FillIn',
-          'AllFeatures',
-        ]).each{|opt|
-        puts "PDFTK/allow: Undefined option #{opt.inspect}"
-      }
-      pdftkcmd << "allow"
-      pdftkcmd << pdftksettings[:allow]
-    end
-    pdftkcmd << "dont_ask"
-    pdftkcmd << "verbose"
-    puts pdftkcmd.join(" ")
-    system(pdftkcmd.join(" "))
-  end  #call_pdftk
-  #Return a HTML-element with links to pre- and successor
-  #  <=  ^  =>
-  #
-  def html_navigation( count, filename_html )
-    nav = element(:div, { :style => CSS.new( :text_align => 'center', :clear=>'both' )})
-    if @frames[count - 1] and count > 0
-      nav << element(:a, { :href=> @frames[count - 1].html_link }, element(:Leftarrow)).cr
-    end
-    nav  << element(:a, { :href=> filename_html }, element(:Uparrow)).cr
-    if @frames[count + 1]
-      nav << element(:a, { :href=> @frames[count + 1].html_link }, element(:Rightarrow)).cr
-    end
-    return nav
-  end
-  #Return all used pics.
-  #Can be used to detect new/obsolete pictures in a directory.
-  def used_pics()
-    pics = []
-    @frames.each{|frame|
-      #~ if frame.framepic
-        #~ pics << frame.framepic.picture.filename
-      #~ end
-      if frame.picname
-        pics << frame.picname
-      end
-    }
-    return pics
-  end
-end
-#
-#Read pictures and build yaml-Template.
-def dir2yaml( pattern, defaults = ''
-  #~ <<-DEFAULTS
-    #~ picwidth: 100%
-    #~ option: left
-    #~ list:
-    #~ # - Punkt 1
-#~ DEFAULTS
-  )
-  defaults.gsub!(/^\s*/, ' ')
-  files2yaml(Dir[pattern])
-end  #dir2yaml
-def files2yaml( files, defaults = '')
-  yaml = []
-  files.each{|f|
-    yaml << '-'
-    yaml << "\tpic: #{f}"
-    yaml << "\ttitle: #{f.gsub(/_|\.png|\.jpg/, ' ')}" if /title:/ !~ defaults
-    yaml << "\twiki: |\n\t\t#~ content" if /wiki:/ !~ defaults
-    yaml << defaults
-  }
-  return yaml.join("\n")
-end
-#Get something and build the data.
-#input can be:
-#-A file -> read it
-#-A string -> call YAML
-#-Else: I expect a valid array/hash
-def prepare_data( input )
-  data = input
-  lineno = 0
-  if input.is_a?(File)
-    #This is normally DATA, so we start with an offset.
-    lineno = input.lineno
-    input = input.readlines.to_s
-  end
-  if input.is_a?(String)
-    begin
-      data = YAML.load( input.gsub(/\t/, ' ') )
-    rescue ArgumentError
-      if /syntax error on line (.*), col/ =~ $!.to_s
-        lineno += $1.to_i
-        raise "Error in YAML-Input (Line #{lineno}?)"
-      end
-      raise "Error in YAML-Input: #{$!}"
-      raise "Error in YAML-Input: #{$!}\n#{input}"
-    end
-  end
-  return data
-end
-#Takes the yaml-data and make some corrections on it.
-#
-#Example:
-#Add a thumb on each value
-#  puts yaml2yaml(DATA, Proc.new{|y|
-#      y['thumb'] = "thumb_#{y['pic']}"
-#      y
-#    }).to_yaml
-#Problem: Umlaute are converted
-def yaml2yaml( input, corrections )
-  data    = prepare_data( input )  #Array of hashes
-  puts "yaml2yaml: No Proc-element given" if ! corrections.is_a?(Proc)
-  newdata  = []
-  data.each{|props|
-    if ! props.is_a?(Hash)
-      raise "yaml2pres: props is no Hash (#{props.inspect})"
-      next
-    end
-    newdata << corrections.call( props )
-  }
-  newdata
-end
-if __FILE__  == $0
-<<TEMPLATE
-require 'C:/usr/Script/MyScripts' if File.exist?('C:/usr/Script/MyScripts.rb')
-require 'yaml2presentation'
-#~ Dir['*.JPG'].each{|f| Knut::Picture.new(f).mk_thumb }
-#~ Dir['*.jpg'].each{|f| Knut::Picture.new(f).mk_thumb }
-TEMPLATE
-pres = Presentation.new( 'Pr�sentationen mit yaml2presentation.rb',
-        :template => :beamerthemetree
-    )
-pres.settings[:shorttitle] = 'yaml2presentation.rb'
-pres.settings[:author] = 'Knut Lickert'
-pres.settings[:date] = Date.today
-#~ pres.settings[:language] << 'Sprache'
-#~ pres.settings[:subtitle] = ''
-pres.head << <<HEADER
-\\AtBeginSection[] % Do nothing for \\section*
-{
-\\frame<beamer>{\\tableofcontents[current]}
-}
-\\AtBeginSubsection[]
-{
-\\frame<beamer>{\\tableofcontents[currentsection,currentsubsection]}
-}
-HEADER
-pres  << DATA.readlines.to_s.gsub(/\t/, '  ')
-puts pres.build_presentation('XX',{}).to_latex(:log=>pres.log)
-pres.save('doc_yaml2presentation',
-    #~ :presentation    => true,
-    #~ :pdftk        => {
-                      #~ :owner_pw    => 'pw',
-                      #~ :user_pw    => 'pw2',
-                      #~ :allow        => [
-                      #~ 'CopyContents',
-                      #~ 'Printing',
-                      #~ ]
-                    #~ },
-    #~ :beamer_article  => true,
-    :beamer_notes  => 'show', #/ 'only' / 'onlyslideswithnotes'
-    #~ :splitscreen  => 'bottom'
-    #~ :splitscreen  => 'right'
-    #~ :html        => true,  #:overview_with_singlepages :with_detailpic
-    :runtex  => true, #:fullpage => true,
-    #~ :picwithname  => true,
-    :maketitle  => true,
-    :maketoc  => true
-    )
-end
-#~ -
-  #~ section: �berschrift
-  #~ subsection: �berschrift 2
-  #~ title:  Titel
-  #~ key: key
-  #~ pic: test.jpg
-  #~ pic*: test.jpg
-  #~ picwidth: 12px
-  #~ thumb: thumb.png
-  #~ fragile: true
-  #~ alignment: t
-  #~ pos: left
-  #~ wiki: |
-    #~ Vorher
-    #~ *punkt 1
-    #~ *Punkt 2
-    #~ Nachher
-  #~ notes: |
-    #~ Notizen
-__END__
--
-  section: Grunds�tzliche Idee
-  title:  Einleitung
-  wiki: |
-    Yaml-Syntax zur Erstellung
-    *Beamer-Pr�sentation (LaTeX) (Ersatz mkpres.rb)
-    *Webgalerie  (HTML)  (Ersatz web-gallery.rb)
-    Darstellung eines Frames wahlweise:
-    *Links ein Bild, rechts kurze Beschreibung
-    *Rechts ein Bild, links kurze Beschreibung
-    *Nur Text
--
-  section: Features
-  subsection: HTML-Galerie
-  title: HTML-Galerie
-  wiki: |
-    *Thumb/Kurzfassung
-    *Langfassung auf Detailseite
--
-  subsection: TeX/Beamer.sty
-  title: TeX/Beamer
-  #~ pic:  c:/usr/wwwHostEurope/Stummfilm/source/Tonfilm_Kitsch.jpg
-  pos: right
-  wiki: |
-    *Text in Wiki-Notation
-    *Link auf Detailbild am Ende
--
-  section: Parameter
-  subsection: Gliederung
-  title: Gliederung
-  wiki: |
-    Parameter f�r Gliederungen:
-    *section
-    **sectionshort
-    *subsection
-    **subsectionshort
-    Jeweils in Frames integriert
--
-  subsection: Optionen zum Frame
-  title: Optionen zum Frame
-  fragile: true
-  wiki: |
-    Bsp:
-        title:  Titel
-        key: key
-    *title: Titel des Frames
-    *key: Optional, f�r label/Link genutzt
--
-  subsection: Optionen zum Text
-  title: Optionen zum Text
-  fragile: true
-  wiki: |
-    Bsp:
-        fragile: true
-        wiki: |
-        Vorher
-        *punkt 1
-        *Punkt 2
-        Nachher
-        notes: |
-          Notizen
-    *notes: Anmerkungen zum Frame (LaTeX)
-    *fragile: LaTeX, falls Wiki verbatim-Text enth�lt.
--
-  subsection: Optionen von Bildern
-  title: Bild einf�gen
-  fragile: true
-  wiki: |
-    Bsp:
-      pic: test.jpg
-      pic*: test.jpg
-      PIC: test.jpg
-      thumb: thumb.png
-    *pic: Bildadresse
-    *pic*: Bild mit Link zu Bild in Fullpage am Dokumentende
-    *PIC: Bild in Fullpage
-    *thumb: Vorlage f�r ''pic*'' (sinnvoll f�r HTML)
--
-  title: Bildoptionen
-  fragile: true
-  wiki: |
-    Bsp:
-      href: http://...
-      picwidth: 12px
-      alignment: t
-      html_class: xx
-      img_class: xx
-    *href: Link auf externe Adresse
-    *alt (HTML)
-    *html\_class (HTML)
-    *img\_class (HTML)
--
-  title: Bildposition
-  fragile: true
-  wiki: |
-    Bsp:
-        pos: left
-    Bildposition relativ zum Text
-    *'''left'''
-    *right
-    *top
-    *bottom
-    Anordnung des Bildes. F�r TeX nur links.
--
-  title: Bild/Textverh�ltnis
-  fragile: true
-  wiki: |
-    Nur f�r LaTeX.
-    Bsp:
-        framepicratio: 0.25;0.5
-    Bildgr��e und Textgr��e im Verh�ltnis zur Textbreite.
--
-  subsection: Weitere Optionen
-  title: Option Restrict
-  wiki: |
-    Werte f�r restrict
-    *:latex
-    *:html
-    Ausgabe auf ein Format begrenzen.
--
-  title: Option pdftk
-  wiki: |
-    Mit der Option ''pdftk'' wird mittels pdftk eine zweite
-    Screen-Version erzeugt.
-    Optionen:
-    *owner\_pw
-    *user\_pw
-    *allow: Ausnahmen f�r Verbote, wenn Passwort gesetzt.