projects
/
koha-ffzg.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 28306: Switch back to using 'mock' instead of 'redefine'
[koha-ffzg.git]
/
opac
/
opac-discharge.pl
diff --git
a/opac/opac-discharge.pl
b/opac/opac-discharge.pl
index
95a4ac3
..
991ebae
100755
(executable)
--- 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;
# 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 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::Patrons;
use Koha::Patron::Discharge;
-use Koha::DateUtils;
my $input = CGI->new;
my $input = CGI->new;