Bug 10776: fix awkward wording in subscription notification screen

[koha.git] / serials / claims.pl

diff --git a/serials/claims.pl b/serials/claims.pl
index 793eb69..5377478 100755 (executable)
--- a/serials/claims.pl
+++ b/serials/claims.pl
@@ -1,5 +1,7 @@
 #!/usr/bin/perl
 
+# Parts Copyright 2010 Biblibre
+
 # This file is part of Koha.
 #
 # Koha is free software; you can redistribute it and/or modify it under the
@@ -22,10 +24,11 @@ use C4::Auth;
 use C4::Serials;
 use C4::Acquisition;
 use C4::Output;
-use C4::Bookseller;
+use C4::Bookseller qw( GetBookSeller );
 use C4::Context;
 use C4::Letters;
 use C4::Branch;    # GetBranches GetBranchesLoop
+use C4::Csv qw( GetCsvProfiles );
 
 my $input = CGI->new;
 
@@ -96,7 +99,7 @@ $template->param(
         claimletter => $claimletter,
         supplierloop => \@supplierinfo,
         branchloop   => $branchloop,
-        dateformat    => C4::Context->preference("dateformat"),
-       DHTMLcalendar_dateformat => C4::Dates->DHTMLcalendar(),
+        csv_profiles => C4::Csv::GetCsvProfiles( "sql" ),
+        (uc(C4::Context->preference("marcflavour"))) => 1
         );
 output_html_with_http_headers $input, $cookie, $template->output;