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

(-)a/authorities/auth_finder.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;
23
22
24
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
25
use C4::Output;
24
use C4::Output;
(-)a/authorities/authorities-home.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 URI::Escape;
23
use URI::Escape;
(-)a/authorities/authorities.pl (-2 / +2 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;
22
23
use CGI qw ( -utf8 );
23
use CGI qw ( -utf8 );
24
use C4::Auth;
24
use C4::Auth;
25
use C4::Output;
25
use C4::Output;
(-)a/authorities/blinddetail-biblio-search.pl (-2 / +1 lines)
Lines 36-43 parameters tables. Link Here
36
36
37
=cut
37
=cut
38
38
39
use strict;
39
use Modern::Perl;
40
use warnings;
41
40
42
use C4::AuthoritiesMarc;
41
use C4::AuthoritiesMarc;
43
use C4::Auth;
42
use C4::Auth;
(-)a/authorities/detail-biblio-search.pl (-3 / +1 lines)
Lines 36-44 parameters tables. Link Here
36
36
37
=cut
37
=cut
38
38
39
39
use Modern::Perl;
40
use strict;
41
use warnings;
42
40
43
use C4::AuthoritiesMarc;
41
use C4::AuthoritiesMarc;
44
use C4::Auth;
42
use C4::Auth;
(-)a/authorities/detail.pl (-3 / +1 lines)
Lines 36-44 parameters tables. Link Here
36
36
37
=cut
37
=cut
38
38
39
39
use Modern::Perl;
40
use strict;
41
use warnings;
42
40
43
use C4::AuthoritiesMarc;
41
use C4::AuthoritiesMarc;
44
use C4::Auth;
42
use C4::Auth;
(-)a/authorities/export.pl (-2 / +1 lines)
Lines 1-6 Link Here
1
#!/usr/bin/perl
1
#!/usr/bin/perl
2
use strict;
2
use Modern::Perl;
3
use warnings;
4
3
5
use C4::Record;
4
use C4::Record;
6
use C4::Auth;
5
use C4::Auth;
(-)a/authorities/merge.pl (-2 / +1 lines)
Lines 17-24 Link Here
17
# with Koha; if not, write to the Free Software Foundation, Inc.,
17
# with Koha; if not, write to the Free Software Foundation, Inc.,
18
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19
19
20
use strict;
20
use Modern::Perl;
21
use warnings;
22
use CGI qw ( -utf8 );
21
use CGI qw ( -utf8 );
23
use C4::Output;
22
use C4::Output;
24
use C4::Auth;
23
use C4::Auth;
(-)a/authorities/merge_ajax.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;
5
4
6
use CGI qw ( -utf8 );
5
use CGI qw ( -utf8 );
7
use CGI::Cookie; # need to check cookies before CGI parses the POST request
6
use CGI::Cookie; # need to check cookies before CGI parses the POST request
8
- 

Return to bug 19994