SF.net SVN: ledger-smb:[5498] branches/1.3/LedgerSMB/Template.pm

[..hidden..]

Revision: 5498
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=5498&view=rev
Author:   einhverfr
Date:     2013-01-06 07:20:49 +0000 (Sun, 06 Jan 2013)
Log Message:
-----------
Undoing accidental commit

Modified Paths:
--------------
    branches/1.3/LedgerSMB/Template.pm

Modified: branches/1.3/LedgerSMB/Template.pm
===================================================================
--- branches/1.3/LedgerSMB/Template.pm	2013-01-06 07:13:48 UTC (rev 5497)
+++ branches/1.3/LedgerSMB/Template.pm	2013-01-06 07:20:49 UTC (rev 5498)
@@ -282,6 +282,7 @@
 sub render {
 	my $self = shift;
 	my $vars = shift;
+        my $do_not_escape = shift; # arrayref
         $vars->{LIST_FORMATS} = sub { return $self->available_formats} ;
         $vars->{CSSDIR} = $LedgerSMB::Sysconfig::cssdir;
 	if ($self->{format} !~ /^\p{IsAlnum}+$/) {
@@ -302,7 +303,7 @@
 		carp 'no_escape mode enabled in rendering';
 		$cleanvars = $vars;
 	} else {
-		$cleanvars = $format->can('preprocess')->($vars);
+		$cleanvars = $format->can('preprocess')->($vars, $do_not_escape);
 	}
         $cleanvars->{escape} = sub { return $format->escape(@_)};
 	if (UNIVERSAL::isa($self->{locale}, 'LedgerSMB::Locale')){

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.