X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=blobdiff_plain;f=opac%2Fopac-discharge.pl;h=991ebae5e07505af07f6eb17fb37d32cdb8ba228;hb=1c115fcff70271246c500d5b5f9290c47b715693;hp=95a4ac3e9fee56762d45991271bcc9784f666c66;hpb=3fe837bc74d110b9b3f378ee0565464d8529e827;p=koha-ffzg.git

diff --git a/opac/opac-discharge.pl b/opac/opac-discharge.pl
index 95a4ac3e9f..991ebae5e0 100755
--- a/opac/opac-discharge.pl
+++ b/opac/opac-discharge.pl
@@ -18,16 +18,14 @@
 # along with Koha; if not, see <http://www.gnu.org/licenses>.
 
 use Modern::Perl;
-use Carp;
+use Carp qw( carp );
 
-use C4::Auth qw(:DEFAULT get_session);
+use C4::Auth qw( get_template_and_user );
 use CGI qw( -utf8 );
 use C4::Context;
-use C4::Output;
-use C4::Log;
+use C4::Output qw( output_html_with_http_headers );
 use Koha::Patrons;
 use Koha::Patron::Discharge;
-use Koha::DateUtils;
 
 my $input = CGI->new;