SL/Template/PlainText.pm

   1 package SL::Template::PlainText;
   2
   3 use SL::Template::LaTeX;
   4
   5 use vars qw(@ISA);
   6
   7 @ISA = qw(SL::Template::LaTeX);
   8
   9 use strict;
  10
  11 sub new {
  12   my $type = shift;
  13
  14   return $type->SUPER::new(@_);
  15 }
  16
  17 sub format_string {
  18   my ($self, $variable) = @_;
  19
  20   return $variable;
  21 }
  22
  23 sub get_mime_type {
  24   return "text/plain";
  25 }
  26
  27 sub parse {
  28 }
  29
  30 1;