--- tpage 2011-07-12 04:27:14.140625000 -0700 +++ tpage-new 2011-07-12 04:38:37.093750000 -0700 @@ -26,6 +26,7 @@ use strict; use Template; use AppConfig; +use Template::Parser::LocalizeNewlines; my $NAME = "tpage"; my $VERSION = 2.70; @@ -61,6 +62,8 @@ # add current directory to INCLUDE_PATH unshift(@{ $ucttopts->{ INCLUDE_PATH } }, '.'); +$ucttopts->{ PARSER } = Template::Parser::LocalizeNewlines->new ; + # read from STDIN if no files specified push(@ARGV, '-') unless @ARGV;