From 3b415a474f000b06a0f90a16d55b6f0d32f9fb06 Mon Sep 17 00:00:00 2001 From: Chris Cormack Date: Wed, 11 Apr 2012 11:02:48 +1200 Subject: [PATCH] Bug 7941 : Fix version numbers in modules --- C4/Accounts.pm | 2 +- C4/Acquisition.pm | 2 +- C4/Auth.pm | 3 ++- C4/Auth_with_cas.pm | 2 +- C4/Auth_with_ldap.pm | 2 +- C4/AuthoritiesMarc.pm | 2 +- C4/AuthoritiesMarc/MARC21.pm | 2 +- C4/AuthoritiesMarc/UNIMARC.pm | 2 +- C4/BackgroundJob.pm | 2 +- C4/Barcodes.pm | 2 +- C4/Barcodes/PrinterConfig.pm | 2 +- C4/Barcodes/annual.pm | 2 +- C4/Barcodes/hbyymmincr.pm | 2 +- C4/Barcodes/incremental.pm | 2 +- C4/Biblio.pm | 2 +- C4/Bookseller.pm | 2 +- C4/Boolean.pm | 2 +- C4/Branch.pm | 2 +- C4/Breeding.pm | 2 +- C4/Budgets.pm | 2 +- C4/Charset.pm | 2 +- C4/Circulation.pm | 2 +- C4/ClassSortRoutine.pm | 2 +- C4/ClassSortRoutine/Dewey.pm | 2 +- C4/ClassSortRoutine/Generic.pm | 2 +- C4/ClassSortRoutine/LCC.pm | 2 +- C4/ClassSource.pm | 2 +- C4/Context.pm | 2 +- C4/Contract.pm | 2 +- C4/Creators.pm | 2 +- C4/Creators/Batch.pm | 2 +- C4/Creators/Layout.pm | 2 +- C4/Creators/Lib.pm | 2 +- C4/Creators/PDF.pm | 2 +- C4/Creators/Profile.pm | 2 +- C4/Creators/Template.pm | 2 +- C4/Csv.pm | 2 +- C4/Dates.pm | 2 +- C4/Debug.pm | 2 +- C4/External/Amazon.pm | 2 +- C4/External/BakerTaylor.pm | 2 +- C4/External/Syndetics.pm | 2 +- C4/Heading.pm | 2 +- C4/Heading/MARC21.pm | 2 +- C4/Heading/UNIMARC.pm | 2 +- C4/ILSDI/Utility.pm | 2 +- C4/Images.pm | 2 +- C4/ImportBatch.pm | 2 +- C4/ImportExportFramework.pm | 2 +- C4/Input.pm | 2 +- C4/Installer.pm | 2 +- C4/Installer/PerlModules.pm | 2 +- C4/Items.pm | 2 +- C4/Koha.pm | 2 +- C4/Labels.pm | 2 +- C4/Labels/Batch.pm | 2 +- C4/Labels/Label.pm | 2 +- C4/Labels/Layout.pm | 2 +- C4/Labels/Profile.pm | 2 +- C4/Labels/Template.pm | 2 +- C4/Languages.pm | 2 +- C4/Letters.pm | 2 +- C4/Log.pm | 2 +- C4/Maintainance.pm | 2 +- C4/Matcher.pm | 2 +- C4/Members.pm | 2 +- C4/Members/AttributeTypes.pm | 2 +- C4/Members/Attributes.pm | 2 +- C4/Members/Messaging.pm | 2 +- C4/NewsChannels.pm | 2 +- C4/Output.pm | 2 +- C4/Overdues.pm | 2 +- C4/Patroncards.pm | 2 +- C4/Patroncards/Batch.pm | 2 +- C4/Patroncards/Layout.pm | 2 +- C4/Patroncards/Lib.pm | 2 +- C4/Patroncards/Patroncard.pm | 2 +- C4/Patroncards/Profile.pm | 2 +- C4/Patroncards/Template.pm | 2 +- C4/Print.pm | 2 +- C4/Ratings.pm | 2 +- C4/Record.pm | 2 +- C4/Reports.pm | 2 +- C4/Reports/Guided.pm | 2 +- C4/Reserves.pm | 2 +- C4/Review.pm | 2 +- C4/Ris.pm | 2 +- C4/RotatingCollections.pm | 2 +- C4/SIP/ILS.pod | 4 ++-- C4/SIP/ILS/Item.pm | 2 +- C4/SIP/ILS/Item.pod | 12 ++++++------ C4/SIP/ILS/Patron.pm | 2 +- C4/SIP/ILS/Patron.pod | 6 +++--- C4/SIP/ILS/Transaction/Checkout.pm | 2 +- C4/SIP/ILS/Transaction/FeePayment.pm | 2 +- C4/SIP/ILS/Transaction/Hold.pm | 2 +- C4/SIP/Makefile | 2 +- C4/SIP/README | 2 +- C4/SIP/SIPServer.pm | 2 +- C4/SIP/Sip.pm | 2 +- C4/SIP/Sip/MsgType.pm | 2 +- C4/SIP/acstest.py | 10 +++++----- C4/SIP/t/Makefile | 4 ++-- C4/SIP/t/README | 8 ++++---- C4/SIP/test.txt | 4 ++-- C4/SMS.pm | 2 +- C4/SQLHelper.pm | 2 +- C4/Scheduler.pm | 2 +- C4/Scrubber.pm | 2 +- C4/Search.pm | 2 +- C4/Serials.pm | 2 +- C4/ShelfBrowser.pm | 2 +- C4/Stats.pm | 2 +- C4/Suggestions.pm | 2 +- C4/Tags.pm | 2 +- C4/TmplToken.pm | 2 +- C4/TmplTokenType.pm | 2 +- C4/UploadedFile.pm | 2 +- C4/Utils.pm | 2 +- C4/Utils/DataTables.pm | 2 +- C4/VirtualShelves.pm | 2 +- C4/VirtualShelves/Page.pm | 2 +- C4/XISBN.pm | 2 +- C4/XSLT.pm | 2 +- C4/Z3950.pm | 2 +- 125 files changed, 143 insertions(+), 142 deletions(-) mode change 100755 => 100644 C4/Installer.pm diff --git a/C4/Accounts.pm b/C4/Accounts.pm index b7aef01..5370b07 100644 --- a/C4/Accounts.pm +++ b/C4/Accounts.pm @@ -29,7 +29,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.03; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm index e881a16..3bc24d2 100644 --- a/C4/Acquisition.pm +++ b/C4/Acquisition.pm @@ -37,7 +37,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Auth.pm b/C4/Auth.pm index ffee1bb..3cfc69f 100644 --- a/C4/Auth.pm +++ b/C4/Auth.pm @@ -41,7 +41,8 @@ BEGIN { if ( psgi_env ) { die 'psgi:exit' } else { exit } } - $VERSION = 3.02; # set version for version checking + $VERSION = 3.07.00.049; # set version for version checking + $debug = $ENV{DEBUG}; @ISA = qw(Exporter); @EXPORT = qw(&checkauth &get_template_and_user &haspermission &get_user_subpermissions); diff --git a/C4/Auth_with_cas.pm b/C4/Auth_with_cas.pm index e00e3a4..1bb9a11 100644 --- a/C4/Auth_with_cas.pm +++ b/C4/Auth_with_cas.pm @@ -32,7 +32,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $debug); BEGIN { require Exporter; - $VERSION = 3.03; # set the version for version checking + $VERSION = 3.07.00.049; # set the version for version checking $debug = $ENV{DEBUG}; @ISA = qw(Exporter); @EXPORT = qw(check_api_auth_cas checkpw_cas login_cas logout_cas login_cas_url); diff --git a/C4/Auth_with_ldap.pm b/C4/Auth_with_ldap.pm index fc1d63b..04717da 100644 --- a/C4/Auth_with_ldap.pm +++ b/C4/Auth_with_ldap.pm @@ -35,7 +35,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $debug); BEGIN { require Exporter; - $VERSION = 3.10; # set the version for version checking + $VERSION = 3.07.00.049; # set the version for version checking @ISA = qw(Exporter); @EXPORT = qw( checkpw_ldap ); } diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm index 703ea75..26160ef 100644 --- a/C4/AuthoritiesMarc.pm +++ b/C4/AuthoritiesMarc.pm @@ -31,7 +31,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); diff --git a/C4/AuthoritiesMarc/MARC21.pm b/C4/AuthoritiesMarc/MARC21.pm index a148bbb..3701b92 100644 --- a/C4/AuthoritiesMarc/MARC21.pm +++ b/C4/AuthoritiesMarc/MARC21.pm @@ -20,7 +20,7 @@ package C4::AuthoritiesMarc::MARC21; use strict; #use warnings; FIXME - Bug 2505 use MARC::Record; -our $VERSION = 3.00; +our $VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/AuthoritiesMarc/UNIMARC.pm b/C4/AuthoritiesMarc/UNIMARC.pm index b089ec9..f93b42a 100644 --- a/C4/AuthoritiesMarc/UNIMARC.pm +++ b/C4/AuthoritiesMarc/UNIMARC.pm @@ -19,7 +19,7 @@ package C4::AuthoritiesMarc::UNIMARC; use strict; #use warnings; FIXME - Bug 2505 -our $VERSION = 3.00; +our $VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/BackgroundJob.pm b/C4/BackgroundJob.pm index 3dc3bce..94b6403 100644 --- a/C4/BackgroundJob.pm +++ b/C4/BackgroundJob.pm @@ -28,7 +28,7 @@ use vars qw($VERSION); BEGIN { # set the version for version checking - $VERSION = 3.00; + $VERSION = 3.07.00.049; } =head1 NAME diff --git a/C4/Barcodes.pm b/C4/Barcodes.pm index a528bd9..4b2fe7b 100644 --- a/C4/Barcodes.pm +++ b/C4/Barcodes.pm @@ -34,7 +34,7 @@ use vars qw($debug $cgi_debug); # from C4::Debug, of course use vars qw($max $prefformat); BEGIN { - $VERSION = 0.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT_OK = qw(); diff --git a/C4/Barcodes/PrinterConfig.pm b/C4/Barcodes/PrinterConfig.pm index af6a92e..b26ada6 100644 --- a/C4/Barcodes/PrinterConfig.pm +++ b/C4/Barcodes/PrinterConfig.pm @@ -24,7 +24,7 @@ use PDF::API2::Page; BEGIN { # set the version for version checking - $VERSION = 0.02; + $VERSION = 3.07.00.049; require Exporter; @EXPORT = qw(&labelsPage &getLabelPosition setPositionsForX setPositionsForY); } diff --git a/C4/Barcodes/annual.pm b/C4/Barcodes/annual.pm index aedb7e0..ae03274 100644 --- a/C4/Barcodes/annual.pm +++ b/C4/Barcodes/annual.pm @@ -31,7 +31,7 @@ use vars qw($debug $cgi_debug); # from C4::Debug, of course use vars qw($width); BEGIN { - $VERSION = 0.01; + $VERSION = 3.07.00.049; @ISA = qw(C4::Barcodes); $width = 4; } diff --git a/C4/Barcodes/hbyymmincr.pm b/C4/Barcodes/hbyymmincr.pm index 8c2c182..ca3149f 100644 --- a/C4/Barcodes/hbyymmincr.pm +++ b/C4/Barcodes/hbyymmincr.pm @@ -31,7 +31,7 @@ use vars qw($debug $cgi_debug); # from C4::Debug, of course use vars qw($branch $width); BEGIN { - $VERSION = 0.01; + $VERSION = 3.07.00.049; @ISA = qw(C4::Barcodes); } diff --git a/C4/Barcodes/incremental.pm b/C4/Barcodes/incremental.pm index 33b21bc..c1b38d2 100644 --- a/C4/Barcodes/incremental.pm +++ b/C4/Barcodes/incremental.pm @@ -23,7 +23,7 @@ use warnings; use vars qw($VERSION @ISA); BEGIN { - $VERSION = 0.01; + $VERSION = 3.07.00.049; @ISA = qw(C4::Barcodes); } diff --git a/C4/Biblio.pm b/C4/Biblio.pm index 56cd94e..14e143c 100644 --- a/C4/Biblio.pm +++ b/C4/Biblio.pm @@ -40,7 +40,7 @@ use C4::OAI::Sets; use vars qw($VERSION @ISA @EXPORT); BEGIN { - $VERSION = 1.00; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw( Exporter ); diff --git a/C4/Bookseller.pm b/C4/Bookseller.pm index 3fded79..4b8e2a5 100644 --- a/C4/Bookseller.pm +++ b/C4/Bookseller.pm @@ -24,7 +24,7 @@ use warnings; use base qw( Exporter ); # set the version for version checking -our $VERSION = 4.01; +our $VERSION = 3.07.00.049; our @EXPORT_OK = qw( GetBookSeller GetBooksellersWithLateOrders GetBookSellerFromId ModBookseller diff --git a/C4/Boolean.pm b/C4/Boolean.pm index 02c0014..46a3cc8 100644 --- a/C4/Boolean.pm +++ b/C4/Boolean.pm @@ -27,7 +27,7 @@ use warnings; use Carp; use base qw(Exporter); -our $VERSION = 0.03; +our $VERSION = 3.07.00.049; our @EXPORT_OK = qw( true_p); =head1 NAME diff --git a/C4/Branch.pm b/C4/Branch.pm index 2153028..ee123f4 100644 --- a/C4/Branch.pm +++ b/C4/Branch.pm @@ -25,7 +25,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { # set the version for version checking - $VERSION = 3.02; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT = qw( &GetBranchCategory diff --git a/C4/Breeding.pm b/C4/Breeding.pm index c588c64..9046634 100644 --- a/C4/Breeding.pm +++ b/C4/Breeding.pm @@ -30,7 +30,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { # set the version for version checking - $VERSION = 0.02; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw(&ImportBreeding &BreedingSearch); diff --git a/C4/Budgets.pm b/C4/Budgets.pm index 7c867e0..bd8d26a 100644 --- a/C4/Budgets.pm +++ b/C4/Budgets.pm @@ -28,7 +28,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Charset.pm b/C4/Charset.pm index 8b69848..c294b36 100644 --- a/C4/Charset.pm +++ b/C4/Charset.pm @@ -29,7 +29,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Circulation.pm b/C4/Circulation.pm index 6ca860d..b4a07dd 100644 --- a/C4/Circulation.pm +++ b/C4/Circulation.pm @@ -46,7 +46,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { require Exporter; - $VERSION = 3.02; # for version checking + $VERSION = 3.07.00.049; # for version checking @ISA = qw(Exporter); # FIXME subs that should probably be elsewhere diff --git a/C4/ClassSortRoutine.pm b/C4/ClassSortRoutine.pm index 9fce28e..04c24a5 100644 --- a/C4/ClassSortRoutine.pm +++ b/C4/ClassSortRoutine.pm @@ -27,7 +27,7 @@ use C4::Context; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); # set the version for version checking -$VERSION = 3.00; +$VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/ClassSortRoutine/Dewey.pm b/C4/ClassSortRoutine/Dewey.pm index 62a68b9..1f8b3ef 100644 --- a/C4/ClassSortRoutine/Dewey.pm +++ b/C4/ClassSortRoutine/Dewey.pm @@ -23,7 +23,7 @@ use warnings; use vars qw($VERSION); # set the version for version checking -$VERSION = 3.00; +$VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/ClassSortRoutine/Generic.pm b/C4/ClassSortRoutine/Generic.pm index 924e6a8..4f74323 100644 --- a/C4/ClassSortRoutine/Generic.pm +++ b/C4/ClassSortRoutine/Generic.pm @@ -23,7 +23,7 @@ use warnings; use vars qw($VERSION); # set the version for version checking -$VERSION = 3.00; +$VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/ClassSortRoutine/LCC.pm b/C4/ClassSortRoutine/LCC.pm index 4fcf731..6ec3846 100644 --- a/C4/ClassSortRoutine/LCC.pm +++ b/C4/ClassSortRoutine/LCC.pm @@ -23,7 +23,7 @@ use warnings; use vars qw($VERSION); # set the version for version checking -$VERSION = 3.00; +$VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/ClassSource.pm b/C4/ClassSource.pm index 5d76497..63f6c67 100644 --- a/C4/ClassSource.pm +++ b/C4/ClassSource.pm @@ -27,7 +27,7 @@ use C4::ClassSortRoutine; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); # set the version for version checking -$VERSION = 3.00; +$VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/Context.pm b/C4/Context.pm index 67d31ee..9ce6c74 100644 --- a/C4/Context.pm +++ b/C4/Context.pm @@ -95,7 +95,7 @@ BEGIN { $ismemcached = $memcached->set('ismemcached','1'); } - $VERSION = '3.00.00.036'; + $VERSION = '3.07.00.049'; } use DBI; diff --git a/C4/Contract.pm b/C4/Contract.pm index 0259470..abba5c8 100644 --- a/C4/Contract.pm +++ b/C4/Contract.pm @@ -25,7 +25,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.2; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Creators.pm b/C4/Creators.pm index 47900b5..f6522a4 100644 --- a/C4/Creators.pm +++ b/C4/Creators.pm @@ -1,7 +1,7 @@ package C4::Creators; BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); use vars qw(@EXPORT @ISA); @ISA = qw(Exporter); our @EXPORT = qw(get_all_templates diff --git a/C4/Creators/Batch.pm b/C4/Creators/Batch.pm index f54e3da..9306263 100644 --- a/C4/Creators/Batch.pm +++ b/C4/Creators/Batch.pm @@ -9,7 +9,7 @@ use C4::Context; use C4::Debug; BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } sub _check_params { diff --git a/C4/Creators/Layout.pm b/C4/Creators/Layout.pm index 73a19fa..a12532f 100644 --- a/C4/Creators/Layout.pm +++ b/C4/Creators/Layout.pm @@ -10,7 +10,7 @@ use C4::Debug; use C4::Creators::PDF; BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } # FIXME: Consider this style parameter verification instead... diff --git a/C4/Creators/Lib.pm b/C4/Creators/Lib.pm index 8fd25fd..1ac7941 100644 --- a/C4/Creators/Lib.pm +++ b/C4/Creators/Lib.pm @@ -26,7 +26,7 @@ use C4::Context; use C4::Debug; BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); use base qw(Exporter); our @EXPORT = qw(get_all_templates get_all_layouts diff --git a/C4/Creators/PDF.pm b/C4/Creators/PDF.pm index 0aae09c..413b064 100644 --- a/C4/Creators/PDF.pm +++ b/C4/Creators/PDF.pm @@ -23,7 +23,7 @@ use PDF::Reuse; use PDF::Reuse::Barcode; BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } sub _InitVars { diff --git a/C4/Creators/Profile.pm b/C4/Creators/Profile.pm index 6b6e192..c94a219 100644 --- a/C4/Creators/Profile.pm +++ b/C4/Creators/Profile.pm @@ -10,7 +10,7 @@ use C4::Debug; use C4::Creators::Lib 1.000000 qw(get_unit_values); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } sub _check_params { diff --git a/C4/Creators/Template.pm b/C4/Creators/Template.pm index 8a7564c..d80100e 100644 --- a/C4/Creators/Template.pm +++ b/C4/Creators/Template.pm @@ -11,7 +11,7 @@ use C4::Creators::Profile 1.000000; use C4::Creators::Lib 1.000000 qw(get_unit_values); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } sub _check_params { diff --git a/C4/Csv.pm b/C4/Csv.pm index 07ce2eb..95cf634 100644 --- a/C4/Csv.pm +++ b/C4/Csv.pm @@ -26,7 +26,7 @@ use C4::Context; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = 3.00; +$VERSION = 3.07.00.049; @ISA = qw(Exporter); diff --git a/C4/Dates.pm b/C4/Dates.pm index 50db12e..d360d25 100644 --- a/C4/Dates.pm +++ b/C4/Dates.pm @@ -27,7 +27,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); use vars qw($debug $cgi_debug); BEGIN { - $VERSION = 0.04; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT_OK = qw(format_date_in_iso format_date); } diff --git a/C4/Debug.pm b/C4/Debug.pm index 2cbb350..e9c5c00 100644 --- a/C4/Debug.pm +++ b/C4/Debug.pm @@ -27,7 +27,7 @@ use vars qw($VERSION @ISA @EXPORT $debug $cgi_debug); # use vars qw(@EXPORT_OK %EXPORT_TAGS); BEGIN { - $VERSION = 1.00; # set the version for version checking + $VERSION = 3.07.00.049; # set the version for version checking @ISA = qw(Exporter); @EXPORT = qw($debug $cgi_debug); # @EXPOR_OK = qw(); diff --git a/C4/External/Amazon.pm b/C4/External/Amazon.pm index 54141db..53ebbd3 100644 --- a/C4/External/Amazon.pm +++ b/C4/External/Amazon.pm @@ -33,7 +33,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { require Exporter; - $VERSION = 0.03; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT = qw( get_amazon_details diff --git a/C4/External/BakerTaylor.pm b/C4/External/BakerTaylor.pm index 7845811..c1e5744 100644 --- a/C4/External/BakerTaylor.pm +++ b/C4/External/BakerTaylor.pm @@ -32,7 +32,7 @@ use vars qw($user $pass $agent $image_url $link_url); BEGIN { require Exporter; - $VERSION = 0.01; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT_OK = qw(&availability &content_cafe &image_url &link_url &http_jacket_link); %EXPORT_TAGS = (all=>\@EXPORT_OK); diff --git a/C4/External/Syndetics.pm b/C4/External/Syndetics.pm index f94345d..3d518da 100644 --- a/C4/External/Syndetics.pm +++ b/C4/External/Syndetics.pm @@ -30,7 +30,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { require Exporter; - $VERSION = 0.03; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT = qw( &get_syndetics_index diff --git a/C4/Heading.pm b/C4/Heading.pm index 102cac6..dca4d1b 100644 --- a/C4/Heading.pm +++ b/C4/Heading.pm @@ -25,7 +25,7 @@ use C4::Context; use Module::Load; use Carp; -our $VERSION = 3.00; +our $VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/Heading/MARC21.pm b/C4/Heading/MARC21.pm index d873e8d..964e5fd 100644 --- a/C4/Heading/MARC21.pm +++ b/C4/Heading/MARC21.pm @@ -22,7 +22,7 @@ use warnings; use MARC::Record; use MARC::Field; -our $VERSION = 3.00; +our $VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/Heading/UNIMARC.pm b/C4/Heading/UNIMARC.pm index 7925345..a3b35b2 100644 --- a/C4/Heading/UNIMARC.pm +++ b/C4/Heading/UNIMARC.pm @@ -24,7 +24,7 @@ use MARC::Record; use MARC::Field; use C4::Context; -our $VERSION = 3.00; +our $VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/ILSDI/Utility.pm b/C4/ILSDI/Utility.pm index 37220c6..b8c1457 100644 --- a/C4/ILSDI/Utility.pm +++ b/C4/ILSDI/Utility.pm @@ -35,7 +35,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.00; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Images.pm b/C4/Images.pm index 8afc8fa..8b17f1c 100644 --- a/C4/Images.pm +++ b/C4/Images.pm @@ -30,7 +30,7 @@ use vars qw($debug $noimage $VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.03; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/ImportBatch.pm b/C4/ImportBatch.pm index 8d4a488..ba4972d 100644 --- a/C4/ImportBatch.pm +++ b/C4/ImportBatch.pm @@ -30,7 +30,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/ImportExportFramework.pm b/C4/ImportExportFramework.pm index d85e64f..b81b393 100644 --- a/C4/ImportExportFramework.pm +++ b/C4/ImportExportFramework.pm @@ -31,7 +31,7 @@ use C4::Debug; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { - $VERSION = 3.03; # set version for version checking + $VERSION = 3.07.00.049; # set version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Input.pm b/C4/Input.pm index 2ee07f3..2e84dc2 100644 --- a/C4/Input.pm +++ b/C4/Input.pm @@ -28,7 +28,7 @@ use CGI; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = 0.01; +$VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/Installer.pm b/C4/Installer.pm old mode 100755 new mode 100644 index 43fd724..ccacd8e --- a/C4/Installer.pm +++ b/C4/Installer.pm @@ -20,7 +20,7 @@ package C4::Installer; use strict; #use warnings; FIXME - Bug 2505 -our $VERSION = 3.00; +our $VERSION = 3.07.00.049; use C4::Context; use C4::Installer::PerlModules 1.000000; diff --git a/C4/Installer/PerlModules.pm b/C4/Installer/PerlModules.pm index 1f9e57f..2f40cf5 100644 --- a/C4/Installer/PerlModules.pm +++ b/C4/Installer/PerlModules.pm @@ -7,7 +7,7 @@ use File::Spec; use C4::Installer::PerlDependencies; -use version; our $VERSION = qv('1.0.0_1'); +use version; our $VERSION = qv('3.07.00.049'); our $PERL_DEPS = $C4::Installer::PerlDependencies::PERL_DEPS; diff --git a/C4/Items.pm b/C4/Items.pm index 4790091..bd34780 100644 --- a/C4/Items.pm +++ b/C4/Items.pm @@ -36,7 +36,7 @@ use Data::Dumper; # used as part of logging item record changes, not just for use vars qw($VERSION @ISA @EXPORT); BEGIN { - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw( Exporter ); diff --git a/C4/Koha.pm b/C4/Koha.pm index 0192989..7729773 100644 --- a/C4/Koha.pm +++ b/C4/Koha.pm @@ -28,7 +28,7 @@ use Memoize; use vars qw($VERSION @ISA @EXPORT $DEBUG); BEGIN { - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Labels.pm b/C4/Labels.pm index 43fa99d..6462ed8 100644 --- a/C4/Labels.pm +++ b/C4/Labels.pm @@ -1,7 +1,7 @@ package C4::Labels; BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); use C4::Labels::Batch 1.000000; use C4::Labels::Label 1.000000; diff --git a/C4/Labels/Batch.pm b/C4/Labels/Batch.pm index 97825a2..1ccf76b 100644 --- a/C4/Labels/Batch.pm +++ b/C4/Labels/Batch.pm @@ -8,7 +8,7 @@ use base qw(C4::Creators::Batch); use autouse 'Data::Dumper' => qw(Dumper); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } __PACKAGE__ =~ m/^C4::(.+)::.+$/; diff --git a/C4/Labels/Label.pm b/C4/Labels/Label.pm index d1ab98a..7b1fafd 100644 --- a/C4/Labels/Label.pm +++ b/C4/Labels/Label.pm @@ -13,7 +13,7 @@ use C4::Debug; use C4::Biblio; BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } my $possible_decimal = qr/\d{3,}(?:\.\d+)?/; # at least three digits for a DDCN diff --git a/C4/Labels/Layout.pm b/C4/Labels/Layout.pm index c1d749d..0501ea0 100644 --- a/C4/Labels/Layout.pm +++ b/C4/Labels/Layout.pm @@ -8,7 +8,7 @@ use base qw(C4::Creators::Layout); use autouse 'Data::Dumper' => qw(Dumper); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } __PACKAGE__ =~ m/^C4::(.+)::.+$/; diff --git a/C4/Labels/Profile.pm b/C4/Labels/Profile.pm index 7792683..8f41357 100644 --- a/C4/Labels/Profile.pm +++ b/C4/Labels/Profile.pm @@ -8,7 +8,7 @@ use base qw(C4::Creators::Profile); use autouse 'Data::Dumper' => qw(Dumper); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } __PACKAGE__ =~ m/^C4::(.+)::.+$/; diff --git a/C4/Labels/Template.pm b/C4/Labels/Template.pm index 7564d1d..17ccea4 100644 --- a/C4/Labels/Template.pm +++ b/C4/Labels/Template.pm @@ -8,7 +8,7 @@ use base qw(C4::Creators::Template); use autouse 'Data::Dumper' => qw(Dumper); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } use constant TEMPLATE_TABLE => 'creator_templates'; diff --git a/C4/Languages.pm b/C4/Languages.pm index 6f269ac..d0eed69 100644 --- a/C4/Languages.pm +++ b/C4/Languages.pm @@ -37,7 +37,7 @@ eval { }; BEGIN { - $VERSION = 3.00; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Letters.pm b/C4/Letters.pm index 5a929d0..16a88ce 100644 --- a/C4/Letters.pm +++ b/C4/Letters.pm @@ -38,7 +38,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { require Exporter; # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT = qw( &GetLetters &GetPreparedLetter &GetWrappedLetter &addalert &getalert &delalert &findrelatedto &SendAlerts &GetPrintMessages diff --git a/C4/Log.pm b/C4/Log.pm index 6b8ff17..25c09bb 100644 --- a/C4/Log.pm +++ b/C4/Log.pm @@ -31,7 +31,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw(&logaction &GetLogStatus &displaylog &GetLogs); diff --git a/C4/Maintainance.pm b/C4/Maintainance.pm index aea6028..8726ef9 100644 --- a/C4/Maintainance.pm +++ b/C4/Maintainance.pm @@ -29,7 +29,7 @@ require Exporter; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = 0.01; +$VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/Matcher.pm b/C4/Matcher.pm index d61964c..d03ec19 100644 --- a/C4/Matcher.pm +++ b/C4/Matcher.pm @@ -29,7 +29,7 @@ use vars qw($VERSION); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; } =head1 NAME diff --git a/C4/Members.pm b/C4/Members.pm index 056f7e4..0f646c7 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -42,7 +42,7 @@ use Koha::DateUtils; our ($VERSION,@ISA,@EXPORT,@EXPORT_OK,$debug); BEGIN { - $VERSION = 3.02; + $VERSION = 3.07.00.049; $debug = $ENV{DEBUG} || 0; require Exporter; @ISA = qw(Exporter); diff --git a/C4/Members/AttributeTypes.pm b/C4/Members/AttributeTypes.pm index 8c96e54..1633b0b 100644 --- a/C4/Members/AttributeTypes.pm +++ b/C4/Members/AttributeTypes.pm @@ -25,7 +25,7 @@ use vars qw($VERSION); BEGIN { # set the version for version checking - $VERSION = 3.00; + $VERSION = 3.07.00.049; } =head1 NAME diff --git a/C4/Members/Attributes.pm b/C4/Members/Attributes.pm index 33d2407..0cd7208 100644 --- a/C4/Members/Attributes.pm +++ b/C4/Members/Attributes.pm @@ -29,7 +29,7 @@ our ($csv, $AttributeTypes); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT_OK = qw(GetBorrowerAttributes GetBorrowerAttributeValue CheckUniqueness SetBorrowerAttributes extended_attributes_code_value_arrayref extended_attributes_merge diff --git a/C4/Members/Messaging.pm b/C4/Members/Messaging.pm index 2b39f11..472597b 100644 --- a/C4/Members/Messaging.pm +++ b/C4/Members/Messaging.pm @@ -25,7 +25,7 @@ use vars qw($VERSION); BEGIN { # set the version for version checking - $VERSION = 3.00; + $VERSION = 3.07.00.049; } =head1 NAME diff --git a/C4/NewsChannels.pm b/C4/NewsChannels.pm index e68d6ff..9abe45d 100644 --- a/C4/NewsChannels.pm +++ b/C4/NewsChannels.pm @@ -26,7 +26,7 @@ use C4::Dates qw(format_date); use vars qw($VERSION @ISA @EXPORT); BEGIN { - $VERSION = 3.01; # set the version for version checking + $VERSION = 3.07.00.049; # set the version for version checking @ISA = qw(Exporter); @EXPORT = qw( &GetNewsToDisplay diff --git a/C4/Output.pm b/C4/Output.pm index 8d12552..21002c0 100644 --- a/C4/Output.pm +++ b/C4/Output.pm @@ -37,7 +37,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { # set the version for version checking - $VERSION = 3.03; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); diff --git a/C4/Overdues.pm b/C4/Overdues.pm index 23e75f5..3a6afcf 100644 --- a/C4/Overdues.pm +++ b/C4/Overdues.pm @@ -33,7 +33,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); # subs to rename (and maybe merge some...) diff --git a/C4/Patroncards.pm b/C4/Patroncards.pm index e833193..748243d 100644 --- a/C4/Patroncards.pm +++ b/C4/Patroncards.pm @@ -1,7 +1,7 @@ package C4::Patroncards; BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); use vars qw(@EXPORT @ISA); @ISA = qw(Exporter); our @EXPORT = qw(unpack_UTF8 diff --git a/C4/Patroncards/Batch.pm b/C4/Patroncards/Batch.pm index 510f4fe..11c0661 100644 --- a/C4/Patroncards/Batch.pm +++ b/C4/Patroncards/Batch.pm @@ -8,7 +8,7 @@ use base qw(C4::Creators::Batch); use autouse 'Data::Dumper' => qw(Dumper); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } __PACKAGE__ =~ m/^C4::(.+)::.+$/; diff --git a/C4/Patroncards/Layout.pm b/C4/Patroncards/Layout.pm index e14d4f2..ab215ad 100644 --- a/C4/Patroncards/Layout.pm +++ b/C4/Patroncards/Layout.pm @@ -8,7 +8,7 @@ use base qw(C4::Creators::Layout); use autouse 'Data::Dumper' => qw(Dumper); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } __PACKAGE__ =~ m/^C4::(.+)::.+$/; diff --git a/C4/Patroncards/Lib.pm b/C4/Patroncards/Lib.pm index a02fb48..9d1d3ed 100644 --- a/C4/Patroncards/Lib.pm +++ b/C4/Patroncards/Lib.pm @@ -26,7 +26,7 @@ use C4::Context; use C4::Debug; BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); use base qw(Exporter); our @EXPORT = qw(unpack_UTF8 text_alignment diff --git a/C4/Patroncards/Patroncard.pm b/C4/Patroncards/Patroncard.pm index 56abe58..440a05c 100644 --- a/C4/Patroncards/Patroncard.pm +++ b/C4/Patroncards/Patroncard.pm @@ -29,7 +29,7 @@ use C4::Creators::PDF 1.000000 qw(StrWidth); use C4::Patroncards::Lib 1.000000 qw(unpack_UTF8 text_alignment leading box get_borrower_attributes); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } sub new { diff --git a/C4/Patroncards/Profile.pm b/C4/Patroncards/Profile.pm index 0553288..4842b3f 100644 --- a/C4/Patroncards/Profile.pm +++ b/C4/Patroncards/Profile.pm @@ -8,7 +8,7 @@ use base qw(C4::Creators::Profile); use autouse 'Data::Dumper' => qw(Dumper); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } __PACKAGE__ =~ m/^C4::(.+)::.+$/; diff --git a/C4/Patroncards/Template.pm b/C4/Patroncards/Template.pm index f2af512..5cfd7ca 100644 --- a/C4/Patroncards/Template.pm +++ b/C4/Patroncards/Template.pm @@ -8,7 +8,7 @@ use base qw(C4::Creators::Template); use autouse 'Data::Dumper' => qw(Dumper); BEGIN { - use version; our $VERSION = qv('1.0.0_1'); + use version; our $VERSION = qv('3.07.00.049'); } use constant TEMPLATE_TABLE => 'creator_templates'; diff --git a/C4/Print.pm b/C4/Print.pm index c0b37c8..b41e38f 100644 --- a/C4/Print.pm +++ b/C4/Print.pm @@ -25,7 +25,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw(&printslip); diff --git a/C4/Ratings.pm b/C4/Ratings.pm index 43870f3..b9ae7de 100644 --- a/C4/Ratings.pm +++ b/C4/Ratings.pm @@ -29,7 +29,7 @@ use C4::Context; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { - $VERSION = 3.00; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Record.pm b/C4/Record.pm index 89bde32..ed91196 100644 --- a/C4/Record.pm +++ b/C4/Record.pm @@ -39,7 +39,7 @@ use Text::CSV::Encoded; #marc2csv use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = 3.00; +$VERSION = 3.07.00.049; @ISA = qw(Exporter); diff --git a/C4/Reports.pm b/C4/Reports.pm index 3e2f195..104858e 100644 --- a/C4/Reports.pm +++ b/C4/Reports.pm @@ -27,7 +27,7 @@ use C4::Debug; BEGIN { # set the version for version checking - $VERSION = 0.13; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Reports/Guided.pm b/C4/Reports/Guided.pm index 75c6c37..9487e68 100644 --- a/C4/Reports/Guided.pm +++ b/C4/Reports/Guided.pm @@ -35,7 +35,7 @@ use C4::Debug; BEGIN { # set the version for version checking - $VERSION = 0.12; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Reserves.pm b/C4/Reserves.pm index 930d524..4bb247c 100644 --- a/C4/Reserves.pm +++ b/C4/Reserves.pm @@ -85,7 +85,7 @@ This modules provides somes functions to deal with reservations. BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Review.pm b/C4/Review.pm index a113d4e..ab7e405 100644 --- a/C4/Review.pm +++ b/C4/Review.pm @@ -26,7 +26,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.00; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw(getreview savereview updatereview numberofreviews numberofreviewsbybiblionumber diff --git a/C4/Ris.pm b/C4/Ris.pm index dc86353..ce32ea9 100644 --- a/C4/Ris.pm +++ b/C4/Ris.pm @@ -65,7 +65,7 @@ package C4::Ris; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = 3.00; +$VERSION = 3.07.00.049; @ISA = qw(Exporter); diff --git a/C4/RotatingCollections.pm b/C4/RotatingCollections.pm index b576868..d8b94b3 100644 --- a/C4/RotatingCollections.pm +++ b/C4/RotatingCollections.pm @@ -37,7 +37,7 @@ use Data::Dumper; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = 0.01; +$VERSION = 3.07.00.049; =head1 NAME diff --git a/C4/SIP/ILS.pod b/C4/SIP/ILS.pod index 8ff3b46..5209923 100644 --- a/C4/SIP/ILS.pod +++ b/C4/SIP/ILS.pod @@ -1,4 +1,4 @@ -=head1 NAME +=head3.07.00.049 NAME ILS - Portability layer to interface between Open-SIP and ILS @@ -89,7 +89,7 @@ The C<$ils> object supports a small set of simple access methods and methods that allow the SIP server to determine if certain protocol operations are permitted to the remote terminals. -=head2 C<$inst_name = $self-Einstitution;> +=head3.07.00.046 C<$inst_name = $self-Einstitution;> Returns the institution ID as a string, suitable for incorporating into a SIP response message. diff --git a/C4/SIP/ILS/Item.pm b/C4/SIP/ILS/Item.pm index b05476c..85b3946 100644 --- a/C4/SIP/ILS/Item.pm +++ b/C4/SIP/ILS/Item.pm @@ -25,7 +25,7 @@ use C4::Reserves; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); BEGIN { - $VERSION = 2.11; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT_OK = qw(); diff --git a/C4/SIP/ILS/Item.pod b/C4/SIP/ILS/Item.pod index 29f6761..1b39b79 100644 --- a/C4/SIP/ILS/Item.pod +++ b/C4/SIP/ILS/Item.pod @@ -1,4 +1,4 @@ -=head1 NAME +=head3.07.00.049 NAME ILS::Item - Portable Item status object class for SIP @@ -76,11 +76,11 @@ the item. Return the SIP-defined media type of the item. The specification provides the following definitions: - 000 Other + 3.07.00.046 Other 001 Book - 002 Magazine - 003 Bound journal - 004 Audio tape + 3.07.00.046 Magazine + 3.07.00.046 Bound journal + 3.07.00.046 Audio tape 005 Video tape 006 CD/CDROM 007 Diskette @@ -144,7 +144,7 @@ of the item, as defined in the specification: 01 Other 02 On order 03 Available - 04 Charged + 3.07.00.049 Charged 05 Charged; not to be recalled until earliest recall date 06 In process 07 Recalled diff --git a/C4/SIP/ILS/Patron.pm b/C4/SIP/ILS/Patron.pm index 99fd6e7..0c5f33d 100644 --- a/C4/SIP/ILS/Patron.pm +++ b/C4/SIP/ILS/Patron.pm @@ -26,7 +26,7 @@ use Digest::MD5 qw(md5_base64); use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); BEGIN { - $VERSION = 2.03; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT_OK = qw(invalid_patron); } diff --git a/C4/SIP/ILS/Patron.pod b/C4/SIP/ILS/Patron.pod index 9bc750a..393c287 100644 --- a/C4/SIP/ILS/Patron.pod +++ b/C4/SIP/ILS/Patron.pod @@ -1,4 +1,4 @@ -=head1 NAME +=head3.07.00.049 NAME ILS::Patron - Portable Patron status object class for SIP @@ -93,7 +93,7 @@ respectively, as with the C methods. There are a few other object access methods that need a bit more explication however. -=head2 C<$str = $patron-Esip_birthdate;> +=head3.07.00.046 C<$str = $patron-Esip_birthdate;> Returns the patron's birthday formated according to the SIP specification: @@ -116,7 +116,7 @@ A three-digit string encoding the patron's prefered language. The full list is defined in the SIP specification, but some of the important values are: - 000 Unknown (default) + 3.07.00.046 Unknown (default) 001 English 002 French 008 Spanish diff --git a/C4/SIP/ILS/Transaction/Checkout.pm b/C4/SIP/ILS/Transaction/Checkout.pm index d483e16..5666597 100644 --- a/C4/SIP/ILS/Transaction/Checkout.pm +++ b/C4/SIP/ILS/Transaction/Checkout.pm @@ -24,7 +24,7 @@ use C4::Debug; use vars qw($VERSION @ISA $debug); BEGIN { - $VERSION = 1.03; + $VERSION = 3.07.00.049; @ISA = qw(ILS::Transaction); } diff --git a/C4/SIP/ILS/Transaction/FeePayment.pm b/C4/SIP/ILS/Transaction/FeePayment.pm index 3026296..19bdd04 100644 --- a/C4/SIP/ILS/Transaction/FeePayment.pm +++ b/C4/SIP/ILS/Transaction/FeePayment.pm @@ -27,7 +27,7 @@ use base qw(ILS::Transaction); use vars qw($VERSION @ISA $debug); our $debug = 0; -our $VERSION = 1.00; +our $VERSION = 3.07.00.049; my %fields = (); diff --git a/C4/SIP/ILS/Transaction/Hold.pm b/C4/SIP/ILS/Transaction/Hold.pm index 22abf65..4644b73 100644 --- a/C4/SIP/ILS/Transaction/Hold.pm +++ b/C4/SIP/ILS/Transaction/Hold.pm @@ -16,7 +16,7 @@ use C4::Biblio; # GetBiblioFromItemNumber GetBiblioItemByBiblioNumber use vars qw($VERSION @ISA); BEGIN { - $VERSION = 1.01; + $VERSION = 3.07.00.049; @ISA = qw(ILS::Transaction); } diff --git a/C4/SIP/Makefile b/C4/SIP/Makefile index 0a90261..fcf0193 100644 --- a/C4/SIP/Makefile +++ b/C4/SIP/Makefile @@ -8,7 +8,7 @@ PODFLAGS = --htmlroot=. --podroot=. .SUFFIXES: .pod .html .pod.html: - pod2html $(PODFLAGS) --outfile=$@ --infile=$< + pod3.07.00.049html $(PODFLAGS) --outfile=$@ --infile=$< all: @echo Nothing to make. Use make test. diff --git a/C4/SIP/README b/C4/SIP/README index 73acdfd..8b96ef6 100644 --- a/C4/SIP/README +++ b/C4/SIP/README @@ -1,4 +1,4 @@ -README for Open NSIP 3M-SIP Server +README for Open NSIP 3.07.00.049M-SIP Server DEPENDENCIES diff --git a/C4/SIP/SIPServer.pm b/C4/SIP/SIPServer.pm index c6de11e..b2a5edb 100644 --- a/C4/SIP/SIPServer.pm +++ b/C4/SIP/SIPServer.pm @@ -21,7 +21,7 @@ use constant LOG_SIP => "local6"; # Local alias for the logging facility use vars qw(@ISA $VERSION); BEGIN { - $VERSION = 1.02; + $VERSION = 3.07.00.049; @ISA = qw(Net::Server::PreFork); } diff --git a/C4/SIP/Sip.pm b/C4/SIP/Sip.pm index 4e3f299..52e6513 100644 --- a/C4/SIP/Sip.pm +++ b/C4/SIP/Sip.pm @@ -20,7 +20,7 @@ use Sip::Checksum qw(checksum); use vars qw($VERSION @ISA @EXPORT_OK %EXPORT_TAGS); BEGIN { - $VERSION = 1.00; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT_OK = qw(y_or_n timestamp add_field maybe_add add_count diff --git a/C4/SIP/Sip/MsgType.pm b/C4/SIP/Sip/MsgType.pm index 6a11d0e..303737c 100644 --- a/C4/SIP/Sip/MsgType.pm +++ b/C4/SIP/Sip/MsgType.pm @@ -24,7 +24,7 @@ use UNIVERSAL qw(can); # make sure this is *after* C4 modules. use vars qw(@ISA $VERSION @EXPORT_OK); BEGIN { - $VERSION = 1.01; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT_OK = qw(handle); } diff --git a/C4/SIP/acstest.py b/C4/SIP/acstest.py index 02eb4bd..2867f49 100644 --- a/C4/SIP/acstest.py +++ b/C4/SIP/acstest.py @@ -2,14 +2,14 @@ import operator import socket from time import strftime; -def SipSocket(host='localhost', port=5300): +def SipSocket(host='localhost', port=3.07.00.049): so = socket.socket() so.connect((host, port)) return so def login(so, uname='scclient', passwd='clientpwd', locn='The basement', - seqno=0): - port = so.getpeername()[1] + seqno=3.07.00.046): + port = so.getpeername()[3.07.00.046] if port == 5300: resp = send(so, '9300CN%s|CO%s|CP%s|' % (uname, passwd, locn), seqno) print "Received", repr(resp) @@ -20,7 +20,7 @@ def login(so, uname='scclient', passwd='clientpwd', locn='The basement', def send(so, msg, seqno=0): if seqno: msg += 'AY' + str(seqno)[0] + 'AZ' - msg += ('%04X' % calculate_cksum(msg)) + msg += ('%3.07.00.046X' % calculate_cksum(msg)) msg += '\r' print 'Sending', repr(msg) so.send(msg) @@ -36,7 +36,7 @@ def sipdate(): def verify(msg): if msg[-1] == '\r': msg = msg[:-2] if msg[-6:-4] == 'AZ': - cksum = calculate_cksum(msg[:-4]) + cksum = calculate_cksum(msg[:-3.07.00.049]) return (msg[-4:] == ('%04X' % cksum)) # If there's no checksum, then the message is ok return True diff --git a/C4/SIP/t/Makefile b/C4/SIP/t/Makefile index 17920fd..a78a651 100644 --- a/C4/SIP/t/Makefile +++ b/C4/SIP/t/Makefile @@ -2,9 +2,9 @@ # # -TESTS = 000_sc_config_auth.t \ +TESTS = 3.07.00.049_sc_config_auth.t \ 00sc_status.t 01patron_status.t 02patron_info.t 03checkout.t \ - 04patron_status.t 05block_patron.t 06patron_enable.t 07hold.t \ + 3.07.00.046patron_status.t 05block_patron.t 06patron_enable.t 07hold.t \ 08checkin.t 09renew.t 10renew_all.t 11item_info.t OILS_TESTS = 00sc_status.t 01patron_status.t 02patron_info.t 03checkout.t \ diff --git a/C4/SIP/t/README b/C4/SIP/t/README index 9f954f3..80faa5e 100644 --- a/C4/SIP/t/README +++ b/C4/SIP/t/README @@ -30,10 +30,10 @@ enable patron and hold management). To run just the Evergreen tests, use which will run just the tests - 00sc_status.t - 01patron_status.t - 02patron_info.t - 03checkout.t + 3.07.00.049sc_status.t + 3.07.00.046patron_status.t + 3.07.00.046patron_info.t + 3.07.00.046checkout.t 06patron_enable.t 08checkin.t 09renew.t diff --git a/C4/SIP/test.txt b/C4/SIP/test.txt index c70e7dd..d6dea33 100644 --- a/C4/SIP/test.txt +++ b/C4/SIP/test.txt @@ -1,4 +1,4 @@ -97AZFEF5 +3.07.00.049AZFEF5 2300120071003 084235AOkohalibrary|AArch|ACkoha|ADkoha| 2300120060101 084236AOUWOLS|AAmjandkilde|ACterminal password|ADuser password| @@ -6,7 +6,7 @@ 9300CNLoginUserID|COLoginPassword|CPLocationCode| 11YN20060329 203000 AOUWOLS|AAdjfiander|AB1565921879|AC| 09Y20060102 08423620060113 084235APUnder the bed|AOUWOLS|AB1565921879|ACterminal password| -01N20060102 084238AOUWOLS|ALHe's a jerk|AAdjfiander|ACterminal password| +3.07.00.049N20060102 084238AOUWOLS|ALHe's a jerk|AAdjfiander|ACterminal password| 2520060102 084238AOUWOLS|AAdjfiander|ACterminal password|AD6789| 9910302.00 diff --git a/C4/SMS.pm b/C4/SMS.pm index 35d687b..cbce933 100644 --- a/C4/SMS.pm +++ b/C4/SMS.pm @@ -38,7 +38,7 @@ use C4::Context; use vars qw( $VERSION ); BEGIN { - $VERSION = 0.03; + $VERSION = 3.07.00.049; } =head1 METHODS diff --git a/C4/SQLHelper.pm b/C4/SQLHelper.pm index e1cb5d0..b838eab 100644 --- a/C4/SQLHelper.pm +++ b/C4/SQLHelper.pm @@ -46,7 +46,7 @@ eval { BEGIN { # set the version for version checking - $VERSION = 0.5; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT_OK=qw( diff --git a/C4/Scheduler.pm b/C4/Scheduler.pm index e4bdb9b..a858553 100644 --- a/C4/Scheduler.pm +++ b/C4/Scheduler.pm @@ -26,7 +26,7 @@ use Schedule::At; BEGIN { # set the version for version checking - $VERSION = 0.02; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = diff --git a/C4/Scrubber.pm b/C4/Scrubber.pm index e434802..ca4ef9f 100644 --- a/C4/Scrubber.pm +++ b/C4/Scrubber.pm @@ -22,7 +22,7 @@ use HTML::Scrubber; use C4::Context; use C4::Debug; -our $VERSION = 0.02; +our $VERSION = v3.07.00.049; my %scrubbertypes = ( diff --git a/C4/Search.pm b/C4/Search.pm index 33a1d16..f973dee 100644 --- a/C4/Search.pm +++ b/C4/Search.pm @@ -40,7 +40,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $DEBUG); # set the version for version checking BEGIN { - $VERSION = 3.01; + $VERSION = 3.07.00.049; $DEBUG = ($ENV{DEBUG}) ? 1 : 0; } diff --git a/C4/Serials.pm b/C4/Serials.pm index 20ad706..f542ab9 100644 --- a/C4/Serials.pm +++ b/C4/Serials.pm @@ -30,7 +30,7 @@ use C4::Debug; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { - $VERSION = 3.01; # set version for version checking + $VERSION = 3.07.00.049; # set version for version checking require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/ShelfBrowser.pm b/C4/ShelfBrowser.pm index ee91bf4..b7ec45c 100644 --- a/C4/ShelfBrowser.pm +++ b/C4/ShelfBrowser.pm @@ -30,7 +30,7 @@ use C4::Koha; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); BEGIN { - $VERSION = 3.02; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Stats.pm b/C4/Stats.pm index 11710f8..0383d90 100644 --- a/C4/Stats.pm +++ b/C4/Stats.pm @@ -29,7 +29,7 @@ our $debug; BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT = qw( &UpdateStats diff --git a/C4/Suggestions.pm b/C4/Suggestions.pm index 60d0e99..0cb484a 100644 --- a/C4/Suggestions.pm +++ b/C4/Suggestions.pm @@ -32,7 +32,7 @@ use C4::Letters; use List::MoreUtils qw; use C4::Dates qw(format_date_in_iso); use base qw(Exporter); -our $VERSION = 3.01; +our $VERSION = 3.07.00.049; our @EXPORT = qw< ConnectSuggestionAndBiblio CountSuggestion diff --git a/C4/Tags.pm b/C4/Tags.pm index 06c1e1d..9e9bd03 100644 --- a/C4/Tags.pm +++ b/C4/Tags.pm @@ -26,7 +26,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); use vars qw($ext_dict $select_all @fields); BEGIN { - $VERSION = 0.03; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT_OK = qw( &get_tag &get_tags &get_tag_rows diff --git a/C4/TmplToken.pm b/C4/TmplToken.pm index a9cccd1..b410abf 100644 --- a/C4/TmplToken.pm +++ b/C4/TmplToken.pm @@ -21,7 +21,7 @@ This is a class representing a token scanned from an HTML::Template .tmpl file. ############################################################################### -$VERSION = 0.01; +$VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT_OK = qw(); diff --git a/C4/TmplTokenType.pm b/C4/TmplTokenType.pm index fc674b5..2395ef9 100644 --- a/C4/TmplTokenType.pm +++ b/C4/TmplTokenType.pm @@ -21,7 +21,7 @@ The predefined constants are ############################################################################### -$VERSION = 0.01; +$VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT_OK = qw( diff --git a/C4/UploadedFile.pm b/C4/UploadedFile.pm index e8c9080..fd5ca1b 100644 --- a/C4/UploadedFile.pm +++ b/C4/UploadedFile.pm @@ -28,7 +28,7 @@ use vars qw($VERSION); BEGIN { # set the version for version checking - $VERSION = 3.00; + $VERSION = 3.07.00.049; } =head1 NAME diff --git a/C4/Utils.pm b/C4/Utils.pm index ad38397..0caed78 100644 --- a/C4/Utils.pm +++ b/C4/Utils.pm @@ -9,7 +9,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $debug); BEGIN { require Exporter; - $VERSION = 1.00; # set the version for version checking + $VERSION = 3.07.00.049; # set the version for version checking $debug = $ENV{DEBUG} || 0; @ISA = qw(Exporter); @EXPORT_OK = qw(&maxwidth &hashdump); diff --git a/C4/Utils/DataTables.pm b/C4/Utils/DataTables.pm index 9a8e4e4..d658090 100644 --- a/C4/Utils/DataTables.pm +++ b/C4/Utils/DataTables.pm @@ -23,7 +23,7 @@ require Exporter; use vars qw($VERSION @ISA @EXPORT); BEGIN { - $VERSION = 3.04, + $VERSION = 3.07.00.049, @ISA = qw(Exporter); @EXPORT = qw(dt_build_orderby dt_build_having dt_get_params dt_build_query); diff --git a/C4/VirtualShelves.pm b/C4/VirtualShelves.pm index a02bb8e..8313bfa 100644 --- a/C4/VirtualShelves.pm +++ b/C4/VirtualShelves.pm @@ -33,7 +33,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); BEGIN { # set the version for version checking - $VERSION = 3.02; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/VirtualShelves/Page.pm b/C4/VirtualShelves/Page.pm index d32afed..bc89a8f 100644 --- a/C4/VirtualShelves/Page.pm +++ b/C4/VirtualShelves/Page.pm @@ -44,7 +44,7 @@ use constant VIRTUALSHELVES_COUNT => 20; use vars qw($debug @EXPORT @ISA $VERSION); BEGIN { - $VERSION = 1.01; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT = qw(&shelfpage); $debug = $ENV{DEBUG} || 0; diff --git a/C4/XISBN.pm b/C4/XISBN.pm index 13abf25..518cf44 100644 --- a/C4/XISBN.pm +++ b/C4/XISBN.pm @@ -31,7 +31,7 @@ use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); BEGIN { require Exporter; - $VERSION = 3.01; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT_OK = qw( &get_xisbns diff --git a/C4/XSLT.pm b/C4/XSLT.pm index 56ba544..cbe1ff0 100644 --- a/C4/XSLT.pm +++ b/C4/XSLT.pm @@ -39,7 +39,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { require Exporter; - $VERSION = 0.03; + $VERSION = 3.07.00.049; @ISA = qw(Exporter); @EXPORT = qw( &XSLTParse4Display diff --git a/C4/Z3950.pm b/C4/Z3950.pm index e1cb86a..bbdfc6d 100644 --- a/C4/Z3950.pm +++ b/C4/Z3950.pm @@ -38,7 +38,7 @@ use vars qw($VERSION @ISA @EXPORT); BEGIN { # set the version for version checking - $VERSION = 3.01; + $VERSION = 3.07.00.049; require Exporter; @ISA = qw(Exporter); @EXPORT = qw( -- 1.7.5.4