Sonderzeichen hochgestellte 2 und 3 für LaTeX escapen.

diff --git a/SL/Template.pm b/SL/Template.pm
index 8693580..693a349 100644 (file)
--- a/SL/Template.pm
+++ b/SL/Template.pm
@@ -92,6 +92,8 @@ sub format_string {
                  '&', quotemeta("\n"),
                  '"', '\$', '%', '_', '#', quotemeta('^'),
                  '{', '}',  '<', '>', '£', "\r", '±', '\xe1',
+                 '²', '³',
+
                  ],
      quotemeta("\\") => '\\textbackslash ',
      '<pagebreak>'   => '',
@@ -110,7 +112,9 @@ sub format_string {
      '±'             => '$\pm$',
      '\xe1'          => '$\bullet$',
      quotemeta('^')  => '\^\\',
-     quotemeta("\n") => '\newline '
+     quotemeta("\n") => '\newline ',
+     '²'             => '$^2$',
+     '³'             => '$^3$',
      );
 
   map({ $variable =~ s/$_/$replace{$_}/g; } @{ $replace{"order"} });