Bug 11349: Change .tmpl -> .tt in scripts using templates

Since we switched to Template Toolkit we don't need to stick with the sufix we used for HTML::Template::Pro. This patch changes the occurences of '.tmpl' in favour of '.tt'. To test: - Apply the patch - Install koha, and verify that every page can be accesed Regards To+ P.S. a followup will remove the glue code. Signed-off-by: Chris Cormack <[email protected]> Signed-off-by: Jonathan Druart <[email protected]> Signed-off-by: Tomas Cohen Arazi <[email protected]>
Mike5620 · Jul 17, 2014 · afd2418 · afd2418
1 parent 9fe36e0
commit afd2418
Show file tree

Hide file tree

Showing 363 changed files with 591 additions and 554 deletions.
diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm
@@ -295,7 +295,7 @@ sub GetBasketAsCSV {
     my @orders = GetOrders($basketno);
     my $contract = GetContract($basket->{'contractnumber'});
 
-    my $template = C4::Templates::gettemplate("acqui/csv/basket.tmpl", "intranet", $cgi);
+    my $template = C4::Templates::gettemplate("acqui/csv/basket.tt", "intranet", $cgi);
 
     my @rows;
     foreach my $order (@orders) {
@@ -356,7 +356,7 @@ sub GetBasketGroupAsCSV {
     my ($basketgroupid, $cgi) = @_;
     my $baskets = GetBasketsByBasketgroup($basketgroupid);
 
-    my $template = C4::Templates::gettemplate('acqui/csv/basketgroup.tmpl', 'intranet', $cgi);
+    my $template = C4::Templates::gettemplate('acqui/csv/basketgroup.tt', 'intranet', $cgi);
 
     my @rows;
     for my $basket (@$baskets) {

diff --git a/C4/Auth.pm b/C4/Auth.pm
@@ -82,7 +82,7 @@ C4::Auth - Authenticates Koha users
   my ($template, $borrowernumber, $cookie)
     = get_template_and_user(
         {
-            template_name   => "opac-main.tmpl",
+            template_name   => "opac-main.tt",
             query           => $query,
       type            => "opac",
       authnotrequired => 0,
@@ -106,7 +106,7 @@ automatically. This gets loaded into the template.
  my ($template, $borrowernumber, $cookie)
      = get_template_and_user(
        {
-         template_name   => "opac-main.tmpl",
+         template_name   => "opac-main.tt",
          query           => $query,
          type            => "opac",
          authnotrequired => 0,
@@ -1046,7 +1046,7 @@ sub checkauth {
     $LibraryNameTitle =~ s/<(?:\/?)(?:br|p)\s*(?:\/?)>/ /sgi;
     $LibraryNameTitle =~ s/<(?:[^<>'"]|'(?:[^']*)'|"(?:[^"]*)")*>//sg;
 
-    my $template_name = ( $type eq 'opac' ) ? 'opac-auth.tmpl' : 'auth.tmpl';
+    my $template_name = ( $type eq 'opac' ) ? 'opac-auth.tt' : 'auth.tt';
     my $template = C4::Templates::gettemplate($template_name, $type, $query );
     $template->param(
         branchloop           => GetBranchesLoop(),

diff --git a/C4/InstallAuth.pm b/C4/InstallAuth.pm
@@ -46,7 +46,7 @@ InstallAuth - Authenticates Koha users for Install process
   my $query = new CGI;
 
   my ($template, $borrowernumber, $cookie) 
-    = get_template_and_user({template_name   => "opac-main.tmpl",
+    = get_template_and_user({template_name   => "opac-main.tt",
                              query           => $query,
 			     type            => "opac",
 			     authnotrequired => 1,
@@ -81,7 +81,7 @@ InstallAuth - Authenticates Koha users for Install process
 =item get_template_and_user
 
   my ($template, $borrowernumber, $cookie)
-    = get_template_and_user({template_name   => "opac-main.tmpl",
+    = get_template_and_user({template_name   => "opac-main.tt",
                              query           => $query,
 			     type            => "opac",
 			     authnotrequired => 1,
@@ -234,7 +234,7 @@ sub checkauth {
 
     my $dbh = C4::Context->dbh();
     my $template_name;
-    $template_name = "installer/auth.tmpl";
+    $template_name = "installer/auth.tt";
 
     # state variables
     my $loggedin = 0;

diff --git a/about.pl b/about.pl
@@ -38,7 +38,7 @@
 my $query = new CGI;
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {
-        template_name   => "about.tmpl",
+        template_name   => "about.tt",
         query           => $query,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/acqui/acqui-home.pl b/acqui/acqui-home.pl
@@ -42,7 +42,7 @@ =head1 DESCRIPTION
 
 my $query = CGI->new;
 my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
-    {   template_name   => 'acqui/acqui-home.tmpl',
+    {   template_name   => 'acqui/acqui-home.tt',
         query           => $query,
         type            => 'intranet',
         authnotrequired => 0,

diff --git a/acqui/addorder.pl b/acqui/addorder.pl
@@ -155,7 +155,7 @@ =head1 CGI PARAMETERS
       || ( ($budget_expenditure+0) && ($budget_used + $total) > $budget_expenditure) )
     {
         my ($template, $loggedinuser, $cookie) = get_template_and_user({
-            template_name   => "acqui/addorder.tmpl",
+            template_name   => "acqui/addorder.tt",
             query           => $input,
             type            => "intranet",
             authnotrequired => 0,
@@ -212,7 +212,7 @@ =head1 CGI PARAMETERS
 # get_template_and_user used only to check auth & get user id
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {
-        template_name   => "acqui/booksellers.tmpl",
+        template_name   => "acqui/booksellers.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/acqui/addorderiso2709.pl b/acqui/addorderiso2709.pl
@@ -47,7 +47,7 @@
 
 my $input = new CGI;
 my ($template, $loggedinuser, $cookie, $userflags) = get_template_and_user({
-    template_name => "acqui/addorderiso2709.tmpl",
+    template_name => "acqui/addorderiso2709.tt",
     query => $input,
     type => "intranet",
     authnotrequired => 0,

diff --git a/acqui/aqbasketuser_search.pl b/acqui/aqbasketuser_search.pl
@@ -31,7 +31,7 @@
 my $dbh = C4::Context->dbh;
 
 my ( $template, $loggedinuser, $cookie, $staff_flags ) = get_template_and_user(
-    {   template_name   => "acqui/aqbasketuser_search.tmpl",
+    {   template_name   => "acqui/aqbasketuser_search.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/acqui/basket.pl b/acqui/basket.pl
@@ -71,7 +71,7 @@ =head1 CGI PARAMETERS
 
 my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
     {
-        template_name   => "acqui/basket.tmpl",
+        template_name   => "acqui/basket.tt",
         query           => $query,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/acqui/basketgroup.pl b/acqui/basketgroup.pl
@@ -62,7 +62,7 @@ =head1 CGI PARAMETERS
 our $input=new CGI;
 
 our ($template, $loggedinuser, $cookie)
-    = get_template_and_user({template_name => "acqui/basketgroup.tmpl",
+    = get_template_and_user({template_name => "acqui/basketgroup.tt",
 			     query => $input,
 			     type => "intranet",
 			     authnotrequired => 0,

diff --git a/acqui/basketheader.pl b/acqui/basketheader.pl
@@ -59,7 +59,7 @@ =head1 CGI PARAMETERS
 my $input = new CGI;
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {
-        template_name   => "acqui/basketheader.tmpl",
+        template_name   => "acqui/basketheader.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/acqui/booksellers.pl b/acqui/booksellers.pl
@@ -66,7 +66,7 @@ =head1 CGI PARAMETERS
 
 my $query = CGI->new;
 my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
-    {   template_name   => 'acqui/booksellers.tmpl',
+    {   template_name   => 'acqui/booksellers.tt',
         query           => $query,
         type            => 'intranet',
         authnotrequired => 0,

diff --git a/acqui/check_budget_total.pl b/acqui/check_budget_total.pl
@@ -36,7 +36,7 @@ =head1 DESCRIPTION
 my $total   = $input->param('total');
 
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
-    {   template_name   => "acqui/ajax.tmpl",
+    {   template_name   => "acqui/ajax.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/acqui/histsearch.pl b/acqui/histsearch.pl
@@ -86,7 +86,7 @@ =head1 CGI PARAMETERS
 my $dbh = C4::Context->dbh;
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {
-        template_name   => "acqui/histsearch.tmpl",
+        template_name   => "acqui/histsearch.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/acqui/invoice.pl b/acqui/invoice.pl
@@ -40,7 +40,7 @@ =head1 DESCRIPTION
 my $input = new CGI;
 my ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user(
     {
-        template_name   => 'acqui/invoice.tmpl',
+        template_name   => 'acqui/invoice.tt',
         query           => $input,
         type            => 'intranet',
         authnotrequired => 0,

diff --git a/acqui/invoices.pl b/acqui/invoices.pl
@@ -41,7 +41,7 @@ =head1 DESCRIPTION
 my $input = CGI->new;
 my ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user(
     {
-        template_name   => 'acqui/invoices.tmpl',
+        template_name   => 'acqui/invoices.tt',
         query           => $input,
         type            => 'intranet',
         authnotrequired => 0,

diff --git a/acqui/lateorders.pl b/acqui/lateorders.pl
@@ -56,14 +56,16 @@ =head1 CGI PARAMETERS
 use Koha::DateUtils;
 
 my $input = new CGI;
-my ($template, $loggedinuser, $cookie) = get_template_and_user({
-	template_name => "acqui/lateorders.tmpl",
-	query => $input,
-	 type => "intranet",
-	authnotrequired => 0,
-	flagsrequired => {acquisition => 'order_receive'},
-	debug => 1,
-});
+my ($template, $loggedinuser, $cookie) = get_template_and_user(
+    {
+        template_name   => "acqui/lateorders.tt",
+        query           => $input,
+        type            => "intranet",
+        authnotrequired => 0,
+        flagsrequired   => { acquisition => 'order_receive' },
+        debug           => 1,
+    }
+);
 
 my $booksellerid = $input->param('booksellerid') || undef; # we don't want "" or 0
 my $delay        = $input->param('delay') // 0;

diff --git a/acqui/modordernotes.pl b/acqui/modordernotes.pl
@@ -36,7 +36,7 @@ =head1 DESCRIPTION
 
 my $input = new CGI;
 my ($template, $loggedinuser, $cookie, $flags) = get_template_and_user( {
-    template_name   => 'acqui/modordernotes.tmpl',
+    template_name   => 'acqui/modordernotes.tt',
     query           => $input,
     type            => 'intranet',
     authnotrequired => 0,

diff --git a/acqui/neworderbiblio.pl b/acqui/neworderbiblio.pl
@@ -84,7 +84,7 @@ =head1 CGI PARAMETERS
 # getting the template
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {
-        template_name   => "acqui/neworderbiblio.tmpl",
+        template_name   => "acqui/neworderbiblio.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/acqui/neworderempty.pl b/acqui/neworderempty.pl
@@ -112,7 +112,7 @@ =head1 CGI PARAMETERS
 
 our ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
     {
-        template_name   => "acqui/neworderempty.tmpl",
+        template_name   => "acqui/neworderempty.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,
@@ -514,7 +514,7 @@ sub Load_Duplicate {
   my ($duplicatetitle)= @_;
   ($template, $loggedinuser, $cookie) = get_template_and_user(
     {
-        template_name   => "acqui/neworderempty_duplicate.tmpl",
+        template_name   => "acqui/neworderempty_duplicate.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/acqui/newordersuggestion.pl b/acqui/newordersuggestion.pl
@@ -116,7 +116,7 @@ =head1 CGI PARAMETERS
 my $dbh = C4::Context->dbh;
 my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
     {
-        template_name   => "acqui/newordersuggestion.tmpl",
+        template_name   => "acqui/newordersuggestion.tt",
         type            => "intranet",
         query           => $input,
         flagsrequired   => { acquisition => 'order_manage' },

diff --git a/acqui/orderreceive.pl b/acqui/orderreceive.pl
@@ -97,7 +97,7 @@ =head1 CGI PARAMETERS
 
 my ( $template, $loggedinuser, $cookie, $userflags ) = get_template_and_user(
     {
-        template_name   => "acqui/orderreceive.tmpl",
+        template_name   => "acqui/orderreceive.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/acqui/parcel.pl b/acqui/parcel.pl
@@ -111,7 +111,7 @@ sub get_gst {
 }
 
 my ($template, $loggedinuser, $cookie)
-    = get_template_and_user({template_name => "acqui/parcel.tmpl",
+    = get_template_and_user({template_name => "acqui/parcel.tt",
                  query => $input,
                  type => "intranet",
                  authnotrequired => 0,

diff --git a/acqui/parcels.pl b/acqui/parcels.pl
@@ -89,7 +89,7 @@ =head1 CGI PARAMETERS
 $resultsperpage ||= 20;
 
 our ( $template, $loggedinuser, $cookie, $flags ) = get_template_and_user(
-    {   template_name   => 'acqui/parcels.tmpl',
+    {   template_name   => 'acqui/parcels.tt',
         query           => $input,
         type            => 'intranet',
         authnotrequired => 0,

diff --git a/acqui/supplier.pl b/acqui/supplier.pl
@@ -59,7 +59,7 @@ =head1 CGI PARAMETERS
 }
 my $op = $query->param('op') || 'display';
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
-    {   template_name   => 'acqui/supplier.tmpl',
+    {   template_name   => 'acqui/supplier.tt',
         query           => $query,
         type            => 'intranet',
         authnotrequired => 0,

diff --git a/acqui/transferorder.pl b/acqui/transferorder.pl
@@ -33,7 +33,7 @@
 
 my $input = new CGI;
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
-    {   template_name   => "acqui/transferorder.tmpl",
+    {   template_name   => "acqui/transferorder.tt",
         query           => $input,
         type            => "intranet",
         flagsrequired   => { acquisition => 'order_manage' },

diff --git a/acqui/uncertainprice.pl b/acqui/uncertainprice.pl
@@ -58,7 +58,7 @@ =head1 CGI PARAMETERS
 my $input=new CGI;
 
 my ($template, $loggedinuser, $cookie)
-    = get_template_and_user({template_name => "acqui/uncertainprice.tmpl",
+    = get_template_and_user({template_name => "acqui/uncertainprice.tt",
 			     query => $input,
 			     type => "intranet",
 			     authnotrequired => 0,

diff --git a/acqui/z3950_search.pl b/acqui/z3950_search.pl
@@ -67,7 +67,7 @@
 
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
     {
-        template_name   => "acqui/z3950_search.tmpl",
+        template_name   => "acqui/z3950_search.tt",
         query           => $input,
         type            => "intranet",
         flagsrequired   => { acquisition => 'order_manage' },

diff --git a/admin/admin-home.pl b/admin/admin-home.pl
@@ -26,7 +26,7 @@
 
 my $query = new CGI;
 my ($template, $loggedinuser, $cookie)
-    = get_template_and_user({template_name => "admin/admin-home.tmpl",
+    = get_template_and_user({template_name => "admin/admin-home.tt",
 			     query => $query,
 			     type => "intranet",
 			     authnotrequired => 0,

diff --git a/admin/aqbudgetperiods.pl b/admin/aqbudgetperiods.pl
@@ -80,13 +80,14 @@ =head1 admin/aqbudgetperiods.pl
 $searchfield =~ s/\,//g;
 
 my ($template, $borrowernumber, $cookie, $staff_flags ) = get_template_and_user(
-	{   template_name   => "admin/aqbudgetperiods.tmpl",
-		query           => $input,
-		type            => "intranet",
-		authnotrequired => 0,
-		flagsrequired   => { acquisition => 'period_manage' },
-		debug           => 1,
-	}
+    {
+        template_name   => "admin/aqbudgetperiods.tt",
+        query           => $input,
+        type            => "intranet",
+        authnotrequired => 0,
+        flagsrequired   => { acquisition => 'period_manage' },
+        debug           => 1,
+    }
 );
 
 

diff --git a/admin/aqcontract.pl b/admin/aqcontract.pl
@@ -38,7 +38,7 @@
 my $bookseller = GetBookSellerFromId($booksellerid);
 
 my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
-    {   template_name   => "admin/aqcontract.tmpl",
+    {   template_name   => "admin/aqcontract.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/admin/aqplan.pl b/admin/aqplan.pl
@@ -45,7 +45,7 @@
 my $dbh = C4::Context->dbh;
 
 my ( $template, $borrowernumber, $cookie, $staff_flags ) = get_template_and_user(
-    {   template_name   => "admin/aqplan.tmpl",
+    {   template_name   => "admin/aqplan.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/admin/auth_subfields_structure.pl b/admin/auth_subfields_structure.pl
@@ -53,7 +53,7 @@ sub auth_subfield_structure_exists {
 my $script_name  = "/cgi-bin/koha/admin/auth_subfields_structure.pl";
 
 my ($template, $borrowernumber, $cookie) = get_template_and_user(
-    {   template_name   => "admin/auth_subfields_structure.tmpl",
+    {   template_name   => "admin/auth_subfields_structure.tt",
         query           => $input,
         type            => "intranet",
         authnotrequired => 0,

diff --git a/admin/auth_tag_structure.pl b/admin/auth_tag_structure.pl
@@ -46,7 +46,7 @@
 
 # open template
 my ($template, $loggedinuser, $cookie)
-    = get_template_and_user({template_name => "admin/auth_tag_structure.tmpl",
+    = get_template_and_user({template_name => "admin/auth_tag_structure.tt",
                  query => $input,
                  type => "intranet",
                  authnotrequired => 0,