Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Bug 8315 - remove use C4::* version

This patch touches a lot of code, but basically it removes version
information from use C4::* in our code.

Signed-off-by: Chris Cormack <chris@bigballofwax.co.nz>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
All script still compiles after the patch (confirmed by pre-applypatch hook)

Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
  • Loading branch information...
commit 10ff4bd4613cbc40ec47444b5da8db1a6a21391b 1 parent 5cb0834
@dpavlin dpavlin authored ranginui committed
View
4 C4/Creators.pm
@@ -38,8 +38,8 @@ BEGIN {
get_unit_values
html_table
);
- use C4::Creators::Lib 1.000000;
- use C4::Creators::PDF 1.000000;
+ use C4::Creators::Lib;
+ use C4::Creators::PDF;
}
1;
View
2  C4/Creators/Profile.pm
@@ -7,7 +7,7 @@ use autouse 'Data::Dumper' => qw(Dumper);
use C4::Context;
use C4::Debug;
-use C4::Creators::Lib 1.000000 qw(get_unit_values);
+use C4::Creators::Lib qw(get_unit_values);
BEGIN {
use version; our $VERSION = qv('3.08.01.002');
View
4 C4/Creators/Template.pm
@@ -7,8 +7,8 @@ use autouse 'Data::Dumper' => qw(Dumper);
use C4::Context;
use C4::Debug;
-use C4::Creators::Profile 1.000000;
-use C4::Creators::Lib 1.000000 qw(get_unit_values);
+use C4::Creators::Profile;
+use C4::Creators::Lib qw(get_unit_values);
BEGIN {
use version; our $VERSION = qv('3.08.01.002');
View
2  C4/Installer.pm
@@ -22,7 +22,7 @@ use strict;
our $VERSION = 3.08.01.002;
use C4::Context;
-use C4::Installer::PerlModules 1.000000;
+use C4::Installer::PerlModules;
=head1 NAME
View
10 C4/Labels.pm
@@ -3,11 +3,11 @@ package C4::Labels;
BEGIN {
use version; our $VERSION = qv('3.08.01.002');
- use C4::Labels::Batch 1.000000;
- use C4::Labels::Label 1.000000;
- use C4::Labels::Layout 1.000000;
- use C4::Labels::Profile 1.000000;
- use C4::Labels::Template 1.000000;
+ use C4::Labels::Batch;
+ use C4::Labels::Label;
+ use C4::Labels::Layout;
+ use C4::Labels::Profile;
+ use C4::Labels::Template;
}
1;
View
12 C4/Patroncards.pm
@@ -13,12 +13,12 @@ BEGIN {
get_image
rm_image
);
- use C4::Patroncards::Batch 1.000000;
- use C4::Patroncards::Layout 1.000000;
- use C4::Patroncards::Lib 1.000000;
- use C4::Patroncards::Patroncard 1.000000;
- use C4::Patroncards::Profile 1.000000;
- use C4::Patroncards::Template 1.000000;
+ use C4::Patroncards::Batch;
+ use C4::Patroncards::Layout;
+ use C4::Patroncards::Lib;
+ use C4::Patroncards::Patroncard;
+ use C4::Patroncards::Profile;
+ use C4::Patroncards::Template;
}
1;
View
6 C4/Patroncards/Patroncard.pm
@@ -24,9 +24,9 @@ use autouse 'Data::Dumper' => qw(Dumper);
use Text::Wrap qw(wrap);
#use Font::TTFMetrics;
-use C4::Creators::Lib 1.000000 qw(get_font_types);
-use C4::Creators::PDF 1.000000 qw(StrWidth);
-use C4::Patroncards::Lib 1.000000 qw(unpack_UTF8 text_alignment leading box get_borrower_attributes);
+use C4::Creators::Lib qw(get_font_types);
+use C4::Creators::PDF qw(StrWidth);
+use C4::Patroncards::Lib qw(unpack_UTF8 text_alignment leading box get_borrower_attributes);
BEGIN {
use version; our $VERSION = qv('3.08.01.002');
View
4 labels/label-create-csv.pl
@@ -26,8 +26,8 @@
use Data::Dumper;
use C4::Debug;
-use C4::Creators 1.000000;
-use C4::Labels 1.000000;
+use C4::Creators;
+use C4::Labels;
my $cgi = new CGI;
View
4 labels/label-create-pdf.pl
@@ -24,8 +24,8 @@
use CGI;
use C4::Auth;
use C4::Debug;
-use C4::Creators 1.000000;
-use C4::Labels 1.000000;
+use C4::Creators;
+use C4::Labels;
my $cgi = new CGI;
View
4 labels/label-create-xml.pl
@@ -26,8 +26,8 @@
use Data::Dumper;
use C4::Debug;
-use C4::Creators 1.000000;
-use C4::Labels 1.000000;
+use C4::Creators;
+use C4::Labels;
my $cgi = new CGI;
View
4 labels/label-edit-batch.pl
@@ -28,8 +28,8 @@
use C4::Output qw(output_html_with_http_headers);
use C4::Branch qw(get_branch_code_from_name);
use C4::Items qw(GetItemnumberFromBarcode);
-use C4::Creators 1.000000;
-use C4::Labels 1.000000;
+use C4::Creators;
+use C4::Labels;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 labels/label-edit-layout.pl
@@ -26,8 +26,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
-use C4::Creators 1.000000;
-use C4::Labels 1.000000;
+use C4::Creators;
+use C4::Labels;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 labels/label-edit-profile.pl
@@ -25,8 +25,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
-use C4::Creators 1.000000;
-use C4::Labels 1.000000;
+use C4::Creators;
+use C4::Labels;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 labels/label-edit-template.pl
@@ -25,8 +25,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
-use C4::Creators 1.000000;
-use C4::Labels 1.000000;
+use C4::Creators;
+use C4::Labels;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 labels/label-manage.pl
@@ -28,8 +28,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
use autouse 'C4::Branch' => qw(get_branch_code_from_name);
-use C4::Creators 1.000000;
-use C4::Labels 1.000000;
+use C4::Creators;
+use C4::Labels;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 labels/label-print.pl
@@ -25,8 +25,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
-use C4::Creators::Lib 1.000000 qw(get_all_templates get_all_layouts get_output_formats);
-use C4::Labels::Batch 1.000000;
+use C4::Creators::Lib qw(get_all_templates get_all_layouts get_output_formats);
+use C4::Labels::Batch;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 patroncards/card-print.pl
@@ -25,8 +25,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
-use C4::Creators 1.000000;
-use C4::Labels 1.000000;
+use C4::Creators;
+use C4::Labels;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 patroncards/create-pdf.pl
@@ -30,8 +30,8 @@
use C4::Debug;
use C4::Context;
use autouse 'C4::Members' => qw(GetPatronImage GetMember);
-use C4::Creators 1.000000;
-use C4::Patroncards 1.000000;
+use C4::Creators;
+use C4::Patroncards;
my $cgi = new CGI;
View
4 patroncards/edit-batch.pl
@@ -28,8 +28,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
use C4::Branch qw(get_branch_code_from_name);
-use C4::Creators 1.000000;
-use C4::Patroncards 1.000000;
+use C4::Creators;
+use C4::Patroncards;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 patroncards/edit-layout.pl
@@ -28,8 +28,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
-use C4::Creators 1.000000;
-use C4::Patroncards 1.000000;
+use C4::Creators;
+use C4::Patroncards;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 patroncards/edit-profile.pl
@@ -25,8 +25,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
-use C4::Creators::Lib 1.000000 qw(get_all_templates get_unit_values);
-use C4::Patroncards::Profile 1.000000;
+use C4::Creators::Lib qw(get_all_templates get_unit_values);
+use C4::Patroncards::Profile;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 patroncards/edit-template.pl
@@ -26,8 +26,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
-use C4::Creators 1.000000;
-use C4::Patroncards 1.000000;
+use C4::Creators;
+use C4::Patroncards;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 patroncards/image-manage.pl
@@ -12,8 +12,8 @@
use C4::Auth;
use C4::Output;
use C4::Debug;
-use C4::Creators 1.000000;
-use C4::Patroncards 1.000000;
+use C4::Creators;
+use C4::Patroncards;
my $cgi = CGI->new;
View
6 patroncards/manage.pl
@@ -28,9 +28,9 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
use autouse 'C4::Branch' => qw(get_branch_code_from_name);
-use C4::Creators 1.000000;
-use C4::Patroncards 1.000000;
-use C4::Labels 1.000000;
+use C4::Creators;
+use C4::Patroncards;
+use C4::Labels;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
4 patroncards/print.pl
@@ -25,8 +25,8 @@
use C4::Auth qw(get_template_and_user);
use C4::Output qw(output_html_with_http_headers);
-use C4::Creators 1.000000;
-use C4::Patroncards 1.000000;
+use C4::Creators;
+use C4::Patroncards;
my $cgi = new CGI;
my ( $template, $loggedinuser, $cookie ) = get_template_and_user(
View
2  tags/list.pl
@@ -27,7 +27,7 @@
use C4::Dates qw(format_date);
use C4::Items;
use C4::Koha;
-use C4::Tags 0.03 qw(get_tags remove_tag get_tag_rows);
+use C4::Tags qw(get_tags remove_tag get_tag_rows);
use C4::Output;
my $needed_flags = { tools => 'moderate_tags'
View
2  tags/review.pl
@@ -32,7 +32,7 @@
# use C4::Koha;
use C4::Output qw(:html :ajax pagination_bar);
use C4::Debug;
-use C4::Tags 0.03 qw(get_tags get_approval_rows approval_counts whitelist blacklist is_approved);
+use C4::Tags qw(get_tags get_approval_rows approval_counts whitelist blacklist is_approved);
my $script_name = "/cgi-bin/koha/tags/review.pl";
my $needed_flags = { tools => 'moderate_tags' }; # FIXME: replace when more specific permission is created.
View
2  tools/manage-marc-import.pl
@@ -34,7 +34,7 @@
use C4::ImportBatch;
use C4::Matcher;
use C4::BackgroundJob;
-use C4::Labels::Batch 1.000000;
+use C4::Labels::Batch;
use C4::Branch qw(get_branch_code_from_name);
my $script_name = "/cgi-bin/koha/tools/manage-marc-import.pl";
Please sign in to comment.
Something went wrong with that request. Please try again.