View | Details | Raw Unified | Return to bug 28624
Collapse All | Expand All

(-)a/about.pl (-3 lines)
Lines 58-66 use Koha::Filter::MARC::ViewPolicy; Link Here
58
58
59
use C4::Members::Statistics;
59
use C4::Members::Statistics;
60
60
61
62
#use Smart::Comments '####';
63
64
my $query = CGI->new;
61
my $query = CGI->new;
65
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
62
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
66
    {
63
    {
(-)a/admin/preferences.pl (-3 lines)
Lines 35-43 use YAML::XS; Link Here
35
use Encode;
35
use Encode;
36
use List::MoreUtils qw(any);
36
use List::MoreUtils qw(any);
37
37
38
# use Smart::Comments;
39
#
40
41
sub GetTab {
38
sub GetTab {
42
    my ( $input, $tab ) = @_;
39
    my ( $input, $tab ) = @_;
43
40
(-)a/labels/spinelabel-home.pl (-2 lines)
Lines 21-28 use C4::Auth; Link Here
21
use C4::Output;
21
use C4::Output;
22
use C4::Context;
22
use C4::Context;
23
23
24
# use Smart::Comments;
25
26
my $query = CGI->new;
24
my $query = CGI->new;
27
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
25
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
28
    {   template_name   => "labels/spinelabel-home.tt",
26
    {   template_name   => "labels/spinelabel-home.tt",
(-)a/members/printslip.pl (-3 lines)
Lines 41-49 use C4::Members; Link Here
41
use C4::Koha;
41
use C4::Koha;
42
use Koha::DateUtils;
42
use Koha::DateUtils;
43
43
44
#use Smart::Comments;
45
#use Data::Dumper;
46
47
use vars qw($debug);
44
use vars qw($debug);
48
45
49
BEGIN {
46
BEGIN {
(-)a/members/update-child.pl (-2 lines)
Lines 35-42 use Koha::Patrons; Link Here
35
use Koha::Patron::Categories;
35
use Koha::Patron::Categories;
36
use Koha::Patrons;
36
use Koha::Patrons;
37
37
38
# use Smart::Comments;
39
40
my $dbh   = C4::Context->dbh;
38
my $dbh   = C4::Context->dbh;
41
my $input = CGI->new;
39
my $input = CGI->new;
42
40
(-)a/serials/subscription-add.pl (-3 lines)
Lines 39-46 use Koha::Subscription::Numberpattern; Link Here
39
use Koha::Subscription::Frequency;
39
use Koha::Subscription::Frequency;
40
use Koha::SharedContent;
40
use Koha::SharedContent;
41
41
42
#use Smart::Comments;
43
44
our $query = CGI->new;
42
our $query = CGI->new;
45
my $op = $query->param('op') || '';
43
my $op = $query->param('op') || '';
46
my $dbh = C4::Context->dbh;
44
my $dbh = C4::Context->dbh;
47
- 

Return to bug 28624