Deal with VMethods causing problems with form.sort

Add wrapper for a simpler UI constructor


git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1617 4979c152-3d1c-0410-bac9-87ea11338e46

1 files changed, 10 insertions, 1 deletions

diff --git a/LedgerSMB/Template.pm b/LedgerSMB/Template.pm
index c982a94d..1f578583 100755
--- a/LedgerSMB/Template.pm
+++ b/LedgerSMB/Template.pm
@@ -74,6 +74,11 @@ The base name of the file for output.
 
 =back
 
+=item new_UI(user => \%myconfig, locale => $locale, template => $file, ...)
+
+Wrapper around the constructor that sets the path to 'UI', format to 'HTML',
+and leaves auto-output enabled.
+
 =item render($hashref)
 
 This command renders the template.  If no_auto_output was not specified during
@@ -144,10 +149,14 @@ sub new {
 		}
 	}
 
-
 	return $self;
 }
 
+sub new_UI {
+	my $class = shift;
+	return $class->new(@_, no_auto_ouput => 0, format => 'HTML', path => 'UI');
+}
+
 sub _valid_language {
 	my $self = shift;
 	if ($self->{language} =~ m#(/|\\|:|\.\.|^\.)#){