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

(-)a/reports/borrowers_out.pl (-2 / +1 lines)
Lines 17-24 Link Here
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
19
20
use strict;
20
use Modern::Perl;
21
use warnings;
22
21
23
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
24
use C4::Auth;
23
use C4::Auth;
(-)a/reports/cat_issues_top.pl (-2 / +1 lines)
Lines 18-25 Link Here
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
20
21
use strict;
21
use Modern::Perl;
22
#use warnings; FIXME - Bug 2505
23
use C4::Auth;
22
use C4::Auth;
24
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
25
use C4::Context;
24
use C4::Context;
(-)a/reports/catalogue_out.pl (-2 / +1 lines)
Lines 17-24 Link Here
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
19
20
use strict;
20
use Modern::Perl;
21
use warnings;
22
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
23
22
24
use C4::Auth;
23
use C4::Auth;
(-)a/reports/catalogue_stats.pl (-2 / +1 lines)
Lines 18-25 Link Here
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
20
21
use strict;
21
use Modern::Perl;
22
#use warnings; FIXME - Bug 2505
23
use C4::Auth;
22
use C4::Auth;
24
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
25
use C4::Context;
24
use C4::Context;
(-)a/reports/dictionary.pl (-2 / +1 lines)
Lines 17-24 Link Here
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
use CGI::Carp qw(fatalsToBrowser warningsToBrowser);
19
use CGI::Carp qw(fatalsToBrowser warningsToBrowser);
20
use strict;
20
use Modern::Perl;
21
use warnings;
22
use C4::Auth;
21
use C4::Auth;
23
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
24
use C4::Output;
23
use C4::Output;
(-)a/reports/issues_avg_stats.pl (-2 / +1 lines)
Lines 18-25 Link Here
18
# You should have received a copy of the GNU General Public License
18
# You should have received a copy of the GNU General Public License
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
# along with Koha; if not, see <http://www.gnu.org/licenses>.
20
20
21
use strict;
21
use Modern::Perl;
22
#use warnings; FIXME - Bug 2505
23
use C4::Auth;
22
use C4::Auth;
24
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
25
use C4::Context;
24
use C4::Context;
(-)a/reports/issues_stats.pl (-2 / +1 lines)
Lines 17-24 Link Here
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
19
20
use strict;
20
use Modern::Perl;
21
use warnings;
22
21
23
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
24
use Date::Manip;
23
use Date::Manip;
(-)a/reports/itemslost.pl (-2 / +1 lines)
Lines 25-32 This script displays lost items. Link Here
25
25
26
=cut
26
=cut
27
27
28
use strict;
28
use Modern::Perl;
29
use warnings;
30
29
31
use CGI qw ( -utf8 );
30
use CGI qw ( -utf8 );
32
use C4::Auth;
31
use C4::Auth;
(-)a/reports/manager.pl (-2 / +1 lines)
Lines 17-24 Link Here
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
19
20
use strict;
20
use Modern::Perl;
21
#use warnings; FIXME - Bug 2505
22
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
23
use C4::Auth;
22
use C4::Auth;
24
use C4::Context;
23
use C4::Context;
(-)a/reports/reports-home.pl (-2 / +1 lines)
Lines 18-25 Link Here
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
19
20
20
21
use strict;
21
use Modern::Perl;
22
#use warnings; FIXME - Bug 2505
23
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
24
use C4::Auth;
23
use C4::Auth;
25
use C4::Output;
24
use C4::Output;
(-)a/reports/serials_stats.pl (-2 / +1 lines)
Lines 17-24 Link Here
17
# You should have received a copy of the GNU General Public License
17
# You should have received a copy of the GNU General Public License
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
18
# along with Koha; if not, see <http://www.gnu.org/licenses>.
19
19
20
use strict;
20
use Modern::Perl;
21
use warnings;
22
use C4::Auth;
21
use C4::Auth;
23
use CGI qw ( -utf8 );
22
use CGI qw ( -utf8 );
24
use C4::Context;
23
use C4::Context;
(-)a/reports/stats.print.pl (-3 / +1 lines)
Lines 1-7 Link Here
1
#!/usr/bin/perl
1
#!/usr/bin/perl
2
2
3
use strict;
3
use Modern::Perl;
4
#use warnings; FIXME - Bug 2505
5
use CGI qw ( -utf8 );
4
use CGI qw ( -utf8 );
6
use C4::Output;
5
use C4::Output;
7
6
8
- 

Return to bug 20012