File Coverage

blib/lib/Text/Amuse/Compile/Templates.pm

Criterion	Covered	Total	%
statement	91	94	96.8
branch	32	40	80.0
condition	3	3	100.0
subroutine	18	18	100.0
pod	13	13	100.0
total	157	168	93.4

package Text::Amuse::Compile::Templates;

use strict;
use warnings FATAL => 'all';
use utf8;

use File::Spec::Functions qw/catfile/;

=head1 NAME

Text::Amuse::Compile::Templates - Built-in templates for Text::Amuse::Compile

=head1 METHODS

=head2 new(ttdir => 'mytemplates')

Costructor. Options:

=over 4

=item ttdir

The directory where to search for templates.

B: some things are needed for a correct
layout/compilation. It's strongly reccomended to use the existing one
(known to work as expected) as starting point for a custom template.

=item format_id

If passed, a template named C<${format_id}-${name}.tt> will be loaded
if exists in the C directory. This gives you as much
flexibility as you need for output.

=back

=head2 TEMPLATES

The following methods return a B to a scalar with the
templates. It should be self-evident which kind of template they
return.

=head3 html

=head3 css

The default CSS, with some minor templating.

=head3 bare_html

The HTML fragment with the B of the text (no HTML headers, no
Muse headers).

=head3 minimal_html

Minimal (but valid) XHTML template, with a link to C.
Meant to be used in the EPUB generation.

=head3 title_page_html

Minimal XHTML template for a title page in the EPUB generation.

=head3 bare_latex

Minimal and uncomplete LaTeX chunck, meant to be used when merging
files.

=head3 latex

The LaTeX template.

The template itself uses two hashrefs with tokens: C and
C. The C contains tokens which are interpreted
as L strings from the C constructor. The
C ones contains validate copies of the C for
places where it make sense, plus some internal things like the
languages and additional strings to get the LaTeX code right.

We use only the C tokens, while the C should be
used only by custom templates which in this way can receive random
stuff.

See L

Anyway, all the values from C and C, because of the
markup interpretation, are (hopefully) safely escaped (so you can pass
even LaTeX commands, and they will be escaped).

=head3 slides

The Beamer template. It shares the same tokens (when it makes sense)
with the LaTeX template.

Theme and color theme selection is done via the
Text::Amuse::Compile::BeamerThemes class, calling C on the
object. The relevant token is C, picked up from
the C and C from the C
constructor.

=head2 INTERNALS

=head3 ttref($name)

Return the scalar ref associated to the given template file, if any.

=head3 names

Return the list of methods for template generation

=cut


sub new {
    my ($class, @args) = @_;
    die "Wrong usage" if @args % 2;
    my %params = @args;
    my $self = {};

    # argument parsing
    foreach my $k (qw/ttdir format_id/) {
        if (exists $params{$k}) {
            $self->{$k} = delete $params{$k};
        }
    }
    die "Unrecognized options: " . join(" ", keys %params) if %params;

    $self->{tt_subrefs} = {};
    if (exists $self->{ttdir} and defined $self->{ttdir}) {

        if (-d $self->{ttdir}) {
            my $dir = $self->{ttdir};
            opendir (my $dh, $dir) or die "Couldn't open $dir $!";
            my @templates = grep { -f catfile($dir, $_)
                                    and
                                       /^
                                        ([a-zA-Z][a-zA-Z0-9_]+-)?
                                        (((bare|minimal)[_.-])?html|
                                            (bare[_.-])?latex     |
                                            css)
                                        (\.tt2?)?/x
                               } readdir($dh);
            closedir $dh;

            foreach my $t (@templates) {
                my $target = catfile($dir, $t);
                open (my $fh, '<:encoding(utf-8)', $target)
                  or die "Can't open $target $!";
                local $/ = undef;
                my $content = <$fh>;
                close $fh;

                # manipulate the subref name
                $t =~ s/\.(tt|tt2)//;
                $t =~ s/[\.-]/_/g;

                # populate the object with closures.
                $self->{tt_subrefs}->{$t} = sub {
                    # copy the content, otherwise we return
                    # a ref that can be modified
                    my $string = $content;
                    return \$string;
                };
            }
        }
        else {
            die "<$self->{ttdir}> is not a directory!";
        }
    }
    bless $self, $class;
}

sub ttdir {
    return shift->{ttdir};
}

sub format_id {
    return shift->{format_id};
}

sub names {
    return (qw/html minimal_html bare_html
               css latex bare_latex
              /);
}

sub ttref {
    my ($self, $name) = @_;
    return unless $name;
    my $tts = $self->{tt_subrefs};
    if (my $format_id = $self->format_id) {
        my $try = $format_id . '_' . $name;
        if (my $sub = $tts->{$try}) {
            return $sub->();
        }
    }
    if (my $sub = $tts->{$name}) {
        return $sub->();
    }
    return;
}

sub html {
    my $self = shift;
    if (my $ref = $self->ttref('html')) {
        return $ref;
    }
    my $html = <<'EOF';





  [% title %]
   </td>
</tr>

<tr>
<td  class="h" >
<a name="215">215</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">  <!--/*--><![CDATA[/*><!--*/ </td>
</tr>

<tr>
<td  class="h" >
<a name="216">216</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s"> [% css %] </td>
</tr>

<tr>
<td  class="h" >
<a name="217">217</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s"> @media only screen { </td>
</tr>

<tr>
<td  class="h" >
<a name="218">218</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">   body { </td>
</tr>

<tr>
<td  class="h" >
<a name="219">219</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">     margin: 40px auto; </td>
</tr>

<tr>
<td  class="h" >
<a name="220">220</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">     max-width: 720px; </td>
</tr>

<tr>
<td  class="h" >
<a name="221">221</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">     line-height: 1.6; </td>
</tr>

<tr>
<td  class="h" >
<a name="222">222</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">     font-size: 18px; </td>
</tr>

<tr>
<td  class="h" >
<a name="223">223</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">     color: rgb(0, 0, 0); </td>
</tr>

<tr>
<td  class="h" >
<a name="224">224</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">     padding: 0 20px; </td>
</tr>

<tr>
<td  class="h" >
<a name="225">225</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">   } </td>
</tr>

<tr>
<td  class="h" >
<a name="226">226</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">   h1, h2, h3, h4, h5, h6 { </td>
</tr>

<tr>
<td  class="h" >
<a name="227">227</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">     line-height: 1.2; </td>
</tr>

<tr>
<td  class="h" >
<a name="228">228</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">   } </td>
</tr>

<tr>
<td  class="h" >
<a name="229">229</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s"> } </td>
</tr>

<tr>
<td  class="h" >
<a name="230">230</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">   /*]]>*/--> </td>
</tr>

<tr>
<td  class="h" >
<a name="231">231</a>
</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td >

&nbsp;

</td>

<td class="s">



  [% IF doc.wants_preamble %]
  [% IF doc.header_defined.author %]
  [% doc.header_as_html.author %]
  [% END %]
  [% doc.header_as_html.title %]
  [% IF doc.header_defined.subtitle %]
  [% doc.header_as_html.subtitle %]
  [% END  %]
  [% IF doc.header_defined.date %]
  [% doc.header_as_html.date %]
  [% END  %]
  [% END %]
  [% IF doc.toc_as_html %]

  [% doc.toc_as_html %]

  [% END %]

[% doc.as_html %]


  [% IF doc.wants_postamble %]


    [% IF doc.header_defined.seriesname %]
    [% IF doc.header_defined.seriesnumber %]

    [% doc.header_as_html.seriesname %] [% doc.header_as_html.seriesnumber %]

    [% END %]
    [% END %]

    [% IF doc.header_defined.source %]

    [% doc.header_as_html.source %]

    [% END %]
    [% IF doc.header_defined.notes %]

    [% doc.header_as_html.notes %]

    [% END %]

    [% IF doc.header_defined.rights %]

    [% doc.header_as_html.rights %]

    [% END %]

    [% IF doc.header_defined.isbn %]

    ISBN [% doc.header_as_html.isbn %]

    [% END %]

    [% IF doc.header_defined.publisher %]

    [% doc.header_as_html.publisher %]

    [% END %]



  [% END %]




EOF
    return \$html;
}

sub css {
    my $self = shift;
    if (my $ref = $self->ttref('css')) {
        return $ref;
    }
    my $css = <<'EOF';
[% IF epub %]
@page { margin: 5pt; }
[% END %]

[% IF epub_embed_fonts %]
  [% FOREACH family IN fonts.families %]
     [% IF family.has_files %]
       [% FOREACH ff IN family.font_files %]
@font-face {
  font-family: "[% family.name %]";
  font-weight: [% ff.css_font_weight %];
  font-style:  [% ff.css_font_style %];
  src: url("[% ff.basename %]") format("[% ff.format %]");
}
       [% END %]
     [% END %]
  [% END %]
[% END %]

html,body {
	margin:0;
	padding:0;
	border: none;
 	background: transparent;
	font-family: [% IF fonts %]"[% fonts.main.name %]",[% END %] serif;
    word-wrap: break-word;
}

div#thework {
    margin-top: 3em;
}

div#thework > p {
   margin: 0;
   text-indent: 1em;
   text-align: justify;
}

p.tableofcontentline {
   margin: 0;
}

blockquote > p, li > p {
   margin-top: 0.5em;
   text-indent: 0em;
   text-align: justify;
}

a {
   color:#000000;
   text-decoration: underline;
}

.table-of-contents a {
   text-decoration: none;
}

[% IF epub %]
/*
 * Workaround for Cool Reader, which as of version 3.2.9
 * does not have default styles for blockquotes defined.
 *
 * These values are taken from https://www.w3schools.com/cssref/css_default_values.asp
 * Firefox 66 uses the same styles by default.
 */
blockquote {
   margin: 1em 40px;
}
[% END %]

[% IF html %]
div#page {
   margin:20px;
   padding:20px;
}
[% END %]

.muse-sc {
   font-variant: small-caps;
}

.muse-sf {
   font-family: [% IF fonts %]"[% fonts.sans.name %]",[% END %]Helvetica,Arial, sans-serif;
}

pre, code {
    font-family: [% IF fonts %]"[% fonts.mono.name %]",[% END %]Consolas, courier, monospace;
}

pre {
    overflow: auto;
}

/* invisibles */
span.hiddenindex, span.commentmarker, .comment, span.tocprefix, #hitme {
    display: none
}

h1 {
    font-size: 200%;
    margin: .67em 0;
    clear: both;
}
h2 {
    font-size: 180%;
    margin: .75em 0;
    clear: both;
}
h3 {
    font-size: 150%;
    margin: .83em 0;
    clear: both;
}
h4 {
    font-size: 130%;
    margin: 1.12em 0;
    clear: both;
}
h5 {
    font-size: 115%;
    margin: 1.5em 0;
    clear: both;
}
h6 {
    font-size: 100%;
    margin: 0;
    clear: both;
}

[% IF centerchapter %]
h1, h2, h3 { text-align: center; }
[% END %]

[% IF centersection %]
h1, h2, h3, h4, h5, h6 { text-align: center; }
[% END %]

sup, sub {
    font-size: 80%;
    line-height: 0;
}

/* invisibles */
span.hiddenindex, span.commentmarker, .comment, span.tocprefix, #hitme {
    display: none
}

.comment {
    background: rgb(255,255,158);
}

.verse {
    margin: 24px 48px;
    overflow: auto;
}

table, th, td {
    border: solid 1px black;
    border-collapse: collapse;
}

td, th {
    padding: 2px 5px;
}

table {
    margin: 24px auto;
}

td, th { vertical-align: top; }

caption {
    caption-side:bottom;
}

table.markdown-style-table,
table.markdown-style-table th,
table.markdown-style-table td {
    border: none;
}

table.markdown-style-table > thead > tr > th,
table.markdown-style-table > thead > tr > td {
    border-bottom: solid 1px black;
}

table.markdown-style-table > tfoot > tr > th,
table.markdown-style-table > tfoot > tr > td {
    border-top: solid 1px black;
}

table.markdown-style-table > thead > tr > td {
    border-bottom: solid 1px black;
}

hr {
    margin: 24px 0;
    color: #000;
    height: 1px;
    background-color: #000;
}

img.embedimg {
    max-width:90%;
}
div.image, div.float_image_f {
    margin: 1em;
    text-align: center;
    padding: 3px;
    background-color: white;
}

div.float_image_r {
    float: right;
    text-align: center;
    margin: 1em 0 1em 1em;
}

div.float_image_l {
    float: left;
    text-align: center;
    margin: 1em 1em 1em 0;
}

div.float_image_f {
    margin-top: 3em;
    margin-bottom: 3em;
    clear: both;
    margin-left: auto;
    margin-right: auto;

}

.biblio p, .play p {
  margin-left: 1em;
  text-indent: -1em;
}

div.biblio, div.play {
  padding: 24px 0;
}

div.caption {
    padding-top: 1em;
    text-align: center;
}

div.center {
    text-align: center;
    margin: 1em 0 1em 0;
}

div.right {
    text-align: right;
    margin: 1em 0 1em 0;
}

div.right > p {
    margin: 0;
}

div.center > p {
    margin: 0;
}

.toclevel1 {
	font-weight: bold;
	font-size:110%;
}

.toclevel2 {
	font-weight: bold;
	font-size: 100%;
    padding-left: 1em;
}

.toclevel3 {
	font-weight: normal;
	font-size: 90%;
    padding-left: 2em;
}

.toclevel4 {
	font-weight: normal;
	font-size: 80%;
    padding-left: 3em;
}

/* definition lists */

dt {
	font-weight: bold;
}
dd {
    margin: 0;
    padding-left: 2em;
}

/* footnotes */

a.footnote, a.footnotebody {
    font-size: 80%;
    line-height: 0;
    vertical-align: super;
    text-decoration: none;
}

* + p.fnline, * + p.secondary-fnline {
    border-top: 1px solid black;
    padding-top: 0.5em;
}

p.fnline + p.fnline,  p.secondary-fnline + p.secondary-fnline {
    border-top: none;
    padding-top: 0;
}

p.fnline, p.secondary-fnline {
    font-size: 80%;
}

/* end footnotes */

div.amw-impressum {
    margin-top: 1em;
}

div.amw-impressum-container {
    margin-top: 10em;
}

EOF
    return \$css;
}

sub bare_html {
    my $self = shift;
    if (my $ref = $self->ttref('bare_html')) {
        return $ref;
    }
    my $html = <<'EOF';
[% IF doc.toc_as_html %]

[% doc.toc_as_html %]

[% END %]

[% doc.as_html %]

EOF
    return \$html;
}

sub title_page_html {
    my $self = shift;
    if (my $ref = $self->ttref('title_page_html')) {
        return $ref;
    }
    my $html = <<'EOF';
[% IF doc.wants_preamble %]

  [% IF doc.header_defined.author %]
  [% doc.header_as_html.author %]
  [% END %]
  [% doc.header_as_html.title %]
  [% IF doc.header_defined.subtitle %]
  [% doc.header_as_html.subtitle %]
  [% END  %]
  [% IF doc.header_defined.date %]
  [% doc.header_as_html.date %]
  [% END  %]

[% END %]

 * * * * *

[% IF doc.wants_postamble %]

  [% IF doc.header_defined.source %]

  [% doc.header_as_html.source %]

  [% END %]
  [% IF doc.header_defined.notes %]

  [% doc.header_as_html.notes %]

  [% END %]

[% END %]
EOF
    return \$html;
}

sub minimal_html {
    # has no options.
    my $self = shift;
    if (my $ref = $self->ttref('minimal_html')) {
        return $ref;
    }
    my $html = <<'EOF';




    [% title %]






[% text %]





EOF
    return \$html;
}


sub latex {
    my $self = shift;
    if (my $ref = $self->ttref('latex')) {
        return $ref;
    }
    my $latex = <<'EOF';
\documentclass[DIV=[% safe_options.division %],%
               BCOR=[% safe_options.bcor %],%
               headinclude=[% IF safe_options.headings %]true[% ELSE %]false[% END %],%
               footinclude=false,[% IF safe_options.opening %]open=[% safe_options.opening %],[% END %]%
               fontsize=[% safe_options.fontsize %]pt,%
               [% safe_options.paging %],%
               paper=[% safe_options.papersize %]]%
               {[% safe_options.class %]}
[% IF safe_options.use_geometry %]
\usepackage[%
  top=[% safe_options.geometry_top_margin %],%
  outer=[% safe_options.geometry_outer_margin %],[% IF safe_options.headings %]includehead,[% END %]%
  width=[% safe_options.areaset_width %],%
  height=[% safe_options.areaset_height %]%
  ]{geometry}
[% ELSE %]
[% IF safe_options.areaset_width %]
[% IF safe_options.areaset_height %]
\areaset[current]{[% safe_options.areaset_width %]}{[% safe_options.areaset_height %]}
[% END %]
[% END %]

[% END %]

[% IF tex_indexes %]
\usepackage[noautomatic]{imakeidx}
[% FOREACH idx IN tex_indexes %]
\makeindex[name=[% idx.name %],title={[% idx.title %]}]
[% END %]
[% END %]

[% tex_setup_langs %]

[% IF safe_options.nocoverpage %]
\let\chapter\section
[% ELSE %]
\renewcommand*{\partpagestyle}{empty}
[% END %]

% global style
[% IF safe_options.headings %]
\setlength{\headsep}{\baselineskip}
\usepackage{scrlayer-scrpage}
\pagestyle{scrheadings}
  [% IF safe_options.twoside %]
    [% IF safe_options.headings.part_chapter %]
    \automark[part]{part}
    \automark*[chapter]{}
    \ohead{\pagemark}
    \ihead{\headmark}
    [% END %]
    [% IF safe_options.headings.title_subtitle %]
    \lehead{\pagemark}
    \rohead{\pagemark}
    \rehead{[% doc.header_as_latex.title %]}
    \lohead{[% IF doc.header_defined.subtitle %][% doc.header_as_latex.subtitle %][% ELSE %][% doc.header_as_latex.title %][% END %]}
    [% END %]
    [% IF safe_options.headings.author_title %]
    \lehead{\pagemark}
    \rohead{\pagemark}
    \rehead{[% IF doc.header_defined.author %][% doc.header_as_latex.author %][% ELSE %][% doc.header_as_latex.title %][% END %]}
    \lohead{[% doc.header_as_latex.title %]}
    [% END %]
    [% IF safe_options.headings.section_subsection %]
    \automark[subsection]{section}
    \ohead[]{\pagemark}
    \ihead[]{\headmark}
    [% END %]
    [% IF safe_options.headings.chapter_section %]
    \automark[section]{chapter}
    \ohead[]{\pagemark}
    \ihead[]{\headmark}
    [% END %]
    [% IF safe_options.headings.title_chapter %]
    \automark[chapter]{chapter}
    \lehead{\pagemark}
    \rohead{\pagemark}
    \rehead{[% doc.header_as_latex.title %]}
    \lohead{\headmark}
    [% END %]
    [% IF safe_options.headings.title_section %]
    \automark[section]{section}
    \lehead{\pagemark}
    \rohead{\pagemark}
    \rehead{[% doc.header_as_latex.title %]}
    \lohead{\headmark}
    [% END %]
    \chead[]{}
    \ifoot[]{}
    \cfoot[]{}
    \ofoot[]{}
  [% ELSE %]
    [% IF safe_options.headings.part_chapter %]
    \automark[part]{part}
    \chead[]{\headmark}
    [% END %]
    [% IF safe_options.headings.title_subtitle %]
    \chead{[% doc.header_as_latex.title %]}
    [% END %]
    [% IF safe_options.headings.author_title %]
    \chead{[% doc.header_as_latex.title %]}
    [% END %]
    [% IF safe_options.headings.section_subsection %]
    \automark[section]{section}
    \chead[]{\headmark}
    [% END %]
    [% IF safe_options.headings.chapter_section %]
    \automark[chapter]{chapter}
    \chead[]{\headmark}
    [% END %]
    [% IF safe_options.headings.title_chapter %]
    \automark[chapter]{chapter}
    \chead[]{\headmark}
    [% END %]
    [% IF safe_options.headings.title_section %]
    \automark[section]{section}
    \chead[]{\headmark}
    [% END %]
    \ihead[]{}
    \ohead[]{}
    \ifoot[]{}
    \cfoot[\pagemark]{\pagemark}
    \ofoot[]{}
  [% END %]
[% ELSE %]
\pagestyle{plain}
[% END %]



\usepackage{indentfirst}

% remove the numbering
\setcounter{secnumdepth}{-2}

% remove labels from the captions
\renewcommand*{\captionformat}{}
\renewcommand*{\figureformat}{}
\renewcommand*{\tableformat}{}
\KOMAoption{captions}{belowfigure,nooneline}
\addtokomafont{caption}{\centering}

[% IF safe_options.continuefootnotes %]
[% UNLESS safe_options.nocoverpage %]
% continuous numbering across the document. Defaults to resetting at chapter.
\usepackage{chngcntr}
\counterwithout{footnote}{chapter}
[% END %]
[% END %]

[% IF safe_options.centerchapter %]
\let\raggedchapter\centering
[% END %]
[% IF safe_options.centersection %]
\let\raggedsection\centering
[% END %]

[% IF enable_secondary_footnotes %]
\usepackage[fragile]{bigfoot}
\usepackage{perpage}
\DeclareNewFootnote{default}
[% IF safe_options.secondary_footnotes_alpha %]
\DeclareNewFootnote{B}[alph]
\MakeSortedPerPage[1]{footnoteB}
[% ELSE %]
\DeclareNewFootnote{B}
\MakeSorted{footnoteB}
\renewcommand*\thefootnoteB{(\arabic{footnoteB})}
[% END %]
[% END %]
\deffootnote[3em]{0em}{4em}{\textsuperscript{\thefootnotemark}~}

[% UNLESS safe_options.sansfontsections %]
\addtokomafont{disposition}{\rmfamily}
\addtokomafont{descriptionlabel}{\rmfamily}
[% END %]

\frenchspacing
% avoid vertical glue
\raggedbottom

% this will generate overfull boxes, so we need to set a tolerance
% \pretolerance=1000
% pretolerance is what is accepted for a paragraph without
% hyphenation, so it makes sense to be strict here and let the user
% accept tweak the tolerance instead.
\tolerance=[% safe_options.tex_tolerance %]
% Additional tolerance for bad paragraphs only
\setlength{\emergencystretch}{[% safe_options.tex_emergencystretch %]}

% (try to) forbid widows/orphans
\clubpenalty=10000
\widowpenalty=10000


[% IF safe_options.fussy_last_word %]
% http://tex.stackexchange.com/questions/304802/how-not-to-hyphenate-the-last-word-of-a-paragraph
\finalhyphendemerits=10000
[% END %]


% given that we said footinclude=false, this should be safe
\setlength{\footskip}{2\baselineskip}
\setlength{\parindent}{[% safe_options.parindent %]pt}

\title{[% doc.header_as_latex.title %]}
\date{[% doc.header_as_latex.date %]}
\author{[% doc.header_as_latex.author %]}
\subtitle{[% doc.header_as_latex.subtitle %]}

[% IF safe_options.nobold %]
\let\textbf\emph
\let\bfseries\normalfont
[% END %]

[% IF safe_options.linespacing %]
\renewcommand{\baselinestretch}{[% safe_options.linespacing %]}
[% END %]

[% IF tex_metadata %]
% https://groups.google.com/d/topic/comp.text.tex/6fYmcVMbSbQ/discussion
\hypersetup{%
pdfencoding=auto,
pdftitle={[% tex_metadata.title %]},%
pdfauthor={[% tex_metadata.author %]},%
pdfsubject={[% tex_metadata.subject %]},%
pdfkeywords={[% tex_metadata.keywords %]}%
}
[% END %]

\begin{document}
[% IF doc.hyphenation %]
\hyphenation{ [% doc.hyphenation %] }
[% END %]


[% UNLESS safe_options.body_only %]

[% IF safe_options.start_with_empty_page %]
% start with an empty page
\thispagestyle{empty}
\strut
\cleardoublepage
[% END %]


[% IF safe_options.nocoverpage %]
\thispagestyle{empty}
[% ELSE %]
  \begin{titlepage}
[% END %]

  \strut\vskip 2em
  \begin{center}
[% IF doc.wants_preamble %]
  {\usekomafont{title}{\huge [% doc.header_as_latex.title %]\par}}%
  \vskip 1em
  [% IF doc.header_defined.subtitle %]
  {\usekomafont{subtitle}{[% doc.header_as_latex.subtitle %]\par}}%
  [% END %]
  \vskip 2em
  [% IF doc.header_defined.author %]
  {\usekomafont{author}{[% doc.header_as_latex.author %]\par}}%
  [% END %]
  \vskip 1.5em
[% ELSE %]
\strut
[% END %]

[% UNLESS safe_options.nocoverpage %]
   [% IF safe_options.cover %]
      [% UNLESS safe_options.ignore_cover %]
      \vskip 3em
      \includegraphics[keepaspectratio=true,height=0.5\textheight,width=[% safe_options.coverwidth %]\textwidth]{[% safe_options.cover %]}
      [% END %]
   [% END %]
   \vfill
[% END %]

[% IF doc.wants_preamble %]
  [% IF doc.header_defined.date %]
  {\usekomafont{date}{[% doc.header_as_latex.date %]\par}}%
  [% ELSE %]
    \strut\par
  [% END %]
[% ELSE %]
  \strut
[% END %]

  \end{center}

[% IF safe_options.nocoverpage %]
  \vskip 3em
  \par
[% ELSE %]
     \end{titlepage}
     [% IF safe_options.impressum %]
          % impressum
          \thispagestyle{empty}
          \begin{center}
          \begin{small}
          \strut
          \vfill

               [% IF doc.header_defined.seriesname %]
               [% IF doc.header_defined.seriesnumber %]
                  [% doc.header_as_latex.seriesname %] [% doc.header_as_latex.seriesnumber %]
                  \vfill
               [% END %]
               [% END %]

               [% IF doc.header_defined.notes %]
                  [% doc.header_as_latex.notes %]
                  \bigskip
               [% END %]

               [% IF doc.header_defined.rights %]
                 [% doc.header_as_latex.rights %]
                 \bigskip
               [% END %]

               [% IF doc.header_defined.isbn %]
                 ISBN [% doc.header_as_latex.isbn %]
                 \bigskip
               [% END %]

               [% IF doc.header_defined.publisher %]
                 [% doc.header_as_latex.publisher %]
                 \bigskip
               [% END %]

          \strut
          \end{small}
          \end{center}
     [% END %]
     \cleardoublepage
[% END %]

[% END %]

[% IF safe_options.wants_toc %]
\tableofcontents
% start a new right-handed page
[% IF safe_options.nocoverpage %]
  \vskip 3em
[% ELSE %]
\cleardoublepage
[% END %]
[% END %]

[% latex_body %]

[% FOREACH idx IN tex_indexes %]
\printindex[[% idx.name %]]
[% END %]


[% UNLESS safe_options.body_only %]

[% UNLESS safe_options.nofinalpage %]
% begin final page

\clearpage

[% IF safe_options.twoside %]
% if we are on an odd page, add another one, otherwise when imposing
% the page would be odd on an even one.
\ifthispageodd{\strut\thispagestyle{empty}\clearpage}{}
[% END %]

% new page for the colophon

\thispagestyle{empty}

\begin{center}
[% IF safe_options.sitename %]
[% safe_options.sitename %]
[% END %]

[% IF safe_options.siteslogan %]
\smallskip
[% safe_options.siteslogan %]
[% END %]

[% IF safe_options.logo %]
\bigskip
\includegraphics[width=0.25\textwidth]{[% safe_options.logo %]}
\bigskip
[% ELSE %]
\strut
[% END %]
\end{center}

\strut

\vfill

\begin{center}

[% IF doc.wants_preamble %]
[% doc.header_as_latex.author     %]

[% doc.header_as_latex.title      %]

[% doc.header_as_latex.subtitle   %]

[% doc.header_as_latex.date       %]
[% ELSE %]
\strut
[% END %]

\bigskip

[% IF doc.wants_postamble %]
[% doc.header_as_latex.source     %]
   [% UNLESS safe_options.impressum  %]

       [% IF doc.header_defined.seriesname %]
       [% IF doc.header_defined.seriesnumber %]
         \noindent [% doc.header_as_latex.seriesname %] [% doc.header_as_latex.seriesnumber %]
       [% END %]
       [% END %]

       [% IF doc.header_defined.notes %]
         [% doc.header_as_latex.notes %]
       [% END %]

       [% IF doc.header_defined.rights %]
         [% doc.header_as_latex.rights %]
         \bigskip
       [% END %]

       [% IF doc.header_defined.isbn %]
         ISBN [% doc.header_as_latex.isbn %]
         \bigskip
       [% END %]

       [% IF doc.header_defined.publisher %]
         [% doc.header_as_latex.publisher %]
         \bigskip
       [% END %]
   [% END %]
[% ELSE %]
\strut
[% END %]

[% IF safe_options.site %]
\bigskip
\textbf{[% safe_options.site %]}
[% END %]

\end{center}

% end final page with colophon
[% END %]

% end closing pages

[% END %]

\end{document}

[% IF safe_options.format_id.DEFAULT %]
% No format ID passed.
[% END %]

EOF
    return \$latex;
}

sub slides {
    my $self = shift;
    if (my $ref = $self->ttref('slides')) {
        return $ref;
    }
    my $slides =<<'LATEX';
\documentclass[ignorenonframetext]{beamer}
[% tex_setup_langs %]
[% IF enable_secondary_footnotes %]
\usepackage[fragile]{bigfoot}
\usepackage{perpage}
\DeclareNewFootnote{default}
[% IF safe_options.secondary_footnotes_alpha %]
\DeclareNewFootnote{B}[alph]
\MakeSortedPerPage[1]{footnoteB}
[% ELSE %]
\DeclareNewFootnote{B}
\MakeSorted{footnoteB}
\renewcommand*\thefootnoteB{(\arabic{footnoteB})}
[% END %]
[% END %]
\usetheme{[% safe_options.beamertheme %]}
\usecolortheme{[% safe_options.beamercolortheme %]}

[% IF doc.is_rtl %]
\setbeamertemplate{frametitle}[default][right]
[% END %]

% remove the numbering
\setcounter{secnumdepth}{-2}

\title{[% doc.header_as_latex.title %]}
\date{[% doc.header_as_latex.date %]}
\author{[% doc.header_as_latex.author %]}
\subtitle{[% doc.header_as_latex.subtitle %]}
\begin{document}
[% IF doc.hyphenation %]
\hyphenation{ [% doc.hyphenation %] }
[% END %]

\begin{document}
\begin{frame}
\titlepage
\end{frame}

[% doc.as_beamer %]

\end{document}

LATEX
    return \$slides;
}


sub bare_latex {
    my $self = shift;
    if (my $ref = $self->ttref('bare_latex')) {
        return $ref;
    }
    my $latex =<<'LATEX';
[% IF doc.hyphenation %]
\hyphenation{ [% doc.hyphenation %] }
[% END %]

\cleardoublepage

[% IF doc.wants_preamble %]
% start titlepage

[% IF doc.wants_toc %]
\strut
\thispagestyle{empty}
\vspace{0.1\textheight}
[% END %]

\phantomsection
\addcontentsline{toc}{part}{[% doc.header_as_latex.title %]}

\begin{center}
  \strut\vskip 2em
  {\usekomafont{title}{\huge [% doc.header_as_latex.title %]\par}}%
  \vskip 1em
  [% IF doc.header_defined.subtitle %]
  {\usekomafont{subtitle}{[% doc.header_as_latex.subtitle %]\par}}%
  [% END %]
  \vskip 2em
  [% IF doc.header_defined.author %]
  {\usekomafont{author}{[% doc.header_as_latex.author %]\par}}%
  [% END %]
  \vskip 1.5em
  [% IF doc.header_defined.date %]
  {\usekomafont{date}{[% doc.header_as_latex.date %]\par}}%
  [% END %]
\end{center}

% end titlepage

[% IF doc.wants_toc %]
\cleardoublepage
[% ELSE %]
\strut\vskip 2em
[% END %]

[% END %]

[% doc.as_latex %]

[% IF doc.wants_postamble %]
\strut
\vfill

[% IF doc.header_defined.source %]
\begin{center}
[% doc.header_as_latex.source     %]
\end{center}
[% END %]

[% IF doc.header_defined.notes %]
\begin{center}
[% doc.header_as_latex.notes      %]
\end{center}
[% END %]

[% END %]

LATEX
    return \$latex;
}

=head1 EXPORT

None.

=cut

1;