From b9c20fa9cf37f5bb16202c400e92bad74f141390 Mon Sep 17 00:00:00 2001 From: Chris Cormack Date: Thu, 18 Oct 2007 18:53:55 -0500 Subject: [PATCH] Patch from Galen Charlton, removing $Id$ $Log$ and $Revision$ from files Signed-off-by: Joshua Ferraro --- C4/Accounts.pm | 5 +---- C4/Acquisition.pm | 3 +-- C4/Auth.pm | 4 +--- C4/AuthoritiesMarc.pm | 4 +--- C4/Bookfund.pm | 3 +-- C4/Bookseller.pm | 3 +-- C4/Boolean.pm | 1 - C4/Branch.pm | 3 +-- C4/Calendar.pm | 2 +- C4/Circulation.pm | 3 +-- C4/Context.pm | 2 -- C4/Koha.pm | 3 +-- C4/Languages.pm | 1 - C4/Letters.pm | 4 +--- C4/Log.pm | 2 +- C4/Members.pm | 3 +-- C4/Output.pm | 3 +-- C4/Overdues.pm | 4 +--- C4/Print.pm | 5 +---- C4/Record.pm | 5 +---- C4/Reserves.pm | 3 +-- C4/Review.pm | 2 +- C4/Search.pm | 4 +--- C4/Serials.pm | 1 - C4/Stats.pm | 5 +---- C4/Suggestions.pm | 4 +--- C4/VirtualShelves.pm | 3 +-- C4/Z3950.pm | 4 +--- C4/tests/Record_test.pl | 2 -- cataloguing/value_builder/macles.pl | 1 - cataloguing/value_builder/marc21_field_003.pl | 1 - cataloguing/value_builder/marc21_field_005.pl | 1 - cataloguing/value_builder/marc21_field_006.pl | 1 - cataloguing/value_builder/marc21_field_007.pl | 1 - cataloguing/value_builder/marc21_field_008.pl | 1 - cataloguing/value_builder/marc21_field_008_authorities.pl | 1 - cataloguing/value_builder/marc21_field_040c.pl | 1 - cataloguing/value_builder/marc21_field_040d.pl | 1 - cataloguing/value_builder/marc21_leader.pl | 1 - cataloguing/value_builder/marc21_leader_authorities.pl | 1 - cataloguing/value_builder/marc21_leader_book.pl | 1 - cataloguing/value_builder/marc21_leader_computerfile.pl | 1 - cataloguing/value_builder/marc21_leader_video.pl | 1 - cataloguing/value_builder/unimarc_field_100.pl | 1 - cataloguing/value_builder/unimarc_field_105.pl | 1 - cataloguing/value_builder/unimarc_field_106.pl | 1 - cataloguing/value_builder/unimarc_field_110.pl | 1 - cataloguing/value_builder/unimarc_field_115a.pl | 1 - cataloguing/value_builder/unimarc_field_115b.pl | 1 - cataloguing/value_builder/unimarc_field_116.pl | 1 - cataloguing/value_builder/unimarc_field_117.pl | 1 - cataloguing/value_builder/unimarc_field_120.pl | 1 - cataloguing/value_builder/unimarc_field_121a.pl | 1 - cataloguing/value_builder/unimarc_field_121b.pl | 1 - cataloguing/value_builder/unimarc_field_122.pl | 1 - cataloguing/value_builder/unimarc_field_123a.pl | 1 - cataloguing/value_builder/unimarc_field_123d.pl | 1 - cataloguing/value_builder/unimarc_field_123e.pl | 1 - cataloguing/value_builder/unimarc_field_123f.pl | 1 - cataloguing/value_builder/unimarc_field_123g.pl | 1 - cataloguing/value_builder/unimarc_field_123i.pl | 1 - cataloguing/value_builder/unimarc_field_123j.pl | 1 - cataloguing/value_builder/unimarc_field_124.pl | 1 - cataloguing/value_builder/unimarc_field_124a.pl | 1 - cataloguing/value_builder/unimarc_field_124b.pl | 1 - cataloguing/value_builder/unimarc_field_124c.pl | 1 - cataloguing/value_builder/unimarc_field_124d.pl | 1 - cataloguing/value_builder/unimarc_field_124e.pl | 1 - cataloguing/value_builder/unimarc_field_124f.pl | 1 - cataloguing/value_builder/unimarc_field_124g.pl | 1 - cataloguing/value_builder/unimarc_field_125.pl | 1 - cataloguing/value_builder/unimarc_field_125a.pl | 1 - cataloguing/value_builder/unimarc_field_125b.pl | 1 - cataloguing/value_builder/unimarc_field_126.pl | 1 - cataloguing/value_builder/unimarc_field_126a.pl | 1 - cataloguing/value_builder/unimarc_field_126b.pl | 1 - cataloguing/value_builder/unimarc_field_127.pl | 1 - cataloguing/value_builder/unimarc_field_128a.pl | 1 - cataloguing/value_builder/unimarc_field_128b.pl | 1 - cataloguing/value_builder/unimarc_field_128c.pl | 1 - cataloguing/value_builder/unimarc_field_130.pl | 1 - cataloguing/value_builder/unimarc_field_135a.pl | 1 - cataloguing/value_builder/unimarc_field_140.pl | 1 - cataloguing/value_builder/unimarc_field_141.pl | 1 - cataloguing/value_builder/unimarc_field_210c.pl | 1 - cataloguing/value_builder/unimarc_field_225a.pl | 1 - cataloguing/value_builder/unimarc_field_4XX.pl | 1 - cataloguing/value_builder/unimarc_field_60X.pl | 1 - cataloguing/value_builder/unimarc_field_700_701_702.pl | 1 - cataloguing/value_builder/unimarc_leader.pl | 1 - etc/zebradb/ccl.properties | 1 - etc/zebradb/pqf.properties | 1 - installer/InstallAuth.pm | 4 +--- koha-tmpl/errors/400.pl | 1 - koha-tmpl/errors/401.pl | 1 - koha-tmpl/errors/402.pl | 1 - koha-tmpl/errors/403.pl | 1 - koha-tmpl/errors/404.pl | 1 - koha-tmpl/errors/500.pl | 1 - koha-tmpl/intranet-tmpl/prog/en/lib/calendar/calendar.js | 1 - koha-tmpl/intranet-tmpl/prog/fr/lib/calendar/calendar.js | 1 - misc/zebra/bib1_authorities.att | 1 - misc/zebra/bib1_biblios.att | 1 - misc/zebra/default.idx | 1 - misc/zebra/record_authorities_unimarc.abs | 1 - misc/zebra/record_authorities_usmarc.abs | 1 - misc/zebra/record_biblios_unimarc.abs | 1 - misc/zebra/record_biblios_usmarc.abs | 1 - misc/zebra/sort-string-utf_french.chr | 1 - t/Input.t | 0 updater/updatedatabase | 2 -- 111 files changed, 25 insertions(+), 151 deletions(-) mode change 100755 => 100644 t/Input.t diff --git a/C4/Accounts.pm b/C4/Accounts.pm index c03a0cde6f..7fe1df0c88 100644 --- a/C4/Accounts.pm +++ b/C4/Accounts.pm @@ -17,7 +17,6 @@ package C4::Accounts; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; require Exporter; @@ -29,9 +28,7 @@ use C4::Members; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; - shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); -}; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm index 22928db5fe..a35d481f46 100644 --- a/C4/Acquisition.pm +++ b/C4/Acquisition.pm @@ -17,7 +17,6 @@ package C4::Acquisition; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; require Exporter; @@ -30,7 +29,7 @@ use Time::localtime; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; # used in receiveorder subroutine # to provide library specific handling diff --git a/C4/Auth.pm b/C4/Auth.pm index 06fdad2cc2..7310f7aefb 100755 --- a/C4/Auth.pm +++ b/C4/Auth.pm @@ -39,9 +39,7 @@ use C4::Branch; # GetBranches use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; - shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); -}; +$VERSION = 3.00; =head1 NAME diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm index d3af8c324c..506dc3808a 100644 --- a/C4/AuthoritiesMarc.pm +++ b/C4/AuthoritiesMarc.pm @@ -27,7 +27,7 @@ use C4::Search; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v).".".join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; @ISA = qw(Exporter); @EXPORT = qw( @@ -1198,8 +1198,6 @@ Paul POULAIN paul.poulain@free.fr =cut -# $Id$ -# $Log$ # Revision 1.50 2007/07/26 15:14:05 toins # removing warn compilation. # diff --git a/C4/Bookfund.pm b/C4/Bookfund.pm index 375e62f814..403a1f3c8c 100644 --- a/C4/Bookfund.pm +++ b/C4/Bookfund.pm @@ -17,7 +17,6 @@ package C4::Bookfund; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; @@ -25,7 +24,7 @@ use strict; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Bookseller.pm b/C4/Bookseller.pm index b30c1bfbb6..72f789630d 100644 --- a/C4/Bookseller.pm +++ b/C4/Bookseller.pm @@ -17,14 +17,13 @@ package C4::Bookseller; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; @ISA = qw(Exporter); @EXPORT = qw( diff --git a/C4/Boolean.pm b/C4/Boolean.pm index fee3917d5d..e49faf6cd2 100644 --- a/C4/Boolean.pm +++ b/C4/Boolean.pm @@ -1,6 +1,5 @@ package C4::Boolean; -# $Id$ #package to handle Boolean values in the parameters table # Note: This is just a utility module; it should not be instantiated. diff --git a/C4/Branch.pm b/C4/Branch.pm index 79d4d54a4b..561ec2c9d6 100644 --- a/C4/Branch.pm +++ b/C4/Branch.pm @@ -15,7 +15,6 @@ package C4::Branch; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; require Exporter; @@ -25,7 +24,7 @@ use C4::Koha; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v).".".join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Calendar.pm b/C4/Calendar.pm index a5deba5b44..cd9be63c0a 100644 --- a/C4/Calendar.pm +++ b/C4/Calendar.pm @@ -23,7 +23,7 @@ use vars qw($VERSION @EXPORT); # use Date::Calc; # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v).".".join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Circulation.pm b/C4/Circulation.pm index 758f99b36f..2dd6c54994 100644 --- a/C4/Circulation.pm +++ b/C4/Circulation.pm @@ -17,7 +17,6 @@ package C4::Circulation; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; require Exporter; @@ -44,7 +43,7 @@ use C4::Log; # logaction our ($VERSION,@ISA,@EXPORT,@EXPORT_OK,%EXPORT_TAGS); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v).".".join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Context.pm b/C4/Context.pm index 98b63cb40a..94f436f15f 100644 --- a/C4/Context.pm +++ b/C4/Context.pm @@ -16,7 +16,6 @@ package C4::Context; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; BEGIN { @@ -944,7 +943,6 @@ Joshua Ferraro =cut -# $Log$ # Revision 1.57 2007/05/22 09:13:55 tipaul # Bugfixes & improvements (various and minor) : # - updating templates to have tmpl_process3.pl running without any errors diff --git a/C4/Koha.pm b/C4/Koha.pm index 40c3fcfed2..22dae295b9 100644 --- a/C4/Koha.pm +++ b/C4/Koha.pm @@ -17,7 +17,6 @@ package C4::Koha; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; require Exporter; @@ -25,7 +24,7 @@ use C4::Context; use C4::Output; our ($VERSION,@ISA,@EXPORT); -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Languages.pm b/C4/Languages.pm index 6bdf4f19e5..626449d140 100644 --- a/C4/Languages.pm +++ b/C4/Languages.pm @@ -18,7 +18,6 @@ package C4::Languages; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; use warnings; #FIXME: turn off warnings before release require Exporter; diff --git a/C4/Letters.pm b/C4/Letters.pm index 044b43647c..1d8856ddf7 100644 --- a/C4/Letters.pm +++ b/C4/Letters.pm @@ -29,9 +29,7 @@ require Exporter; our ( $VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS ); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; - shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); -}; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Log.pm b/C4/Log.pm index a308d225ea..ba4f5e331c 100644 --- a/C4/Log.pm +++ b/C4/Log.pm @@ -29,7 +29,7 @@ require Exporter; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Members.pm b/C4/Members.pm index 5a06d43c2f..edd69c571e 100644 --- a/C4/Members.pm +++ b/C4/Members.pm @@ -17,7 +17,6 @@ package C4::Members; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; require Exporter; @@ -31,7 +30,7 @@ use C4::Reserves; our ($VERSION,@ISA,@EXPORT,@EXPORT_OK); -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Output.pm b/C4/Output.pm index d809c3bee0..d4ae30fe00 100644 --- a/C4/Output.pm +++ b/C4/Output.pm @@ -21,7 +21,6 @@ package C4::Output; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ # NOTE: I'm pretty sure this module is deprecated in favor of # templates. @@ -35,7 +34,7 @@ use HTML::Template::Pro; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Overdues.pm b/C4/Overdues.pm index 5cfd758342..99cf3b8234 100644 --- a/C4/Overdues.pm +++ b/C4/Overdues.pm @@ -1,6 +1,5 @@ package C4::Overdues; -# $Id$ # Copyright 2000-2002 Katipo Communications # @@ -29,8 +28,7 @@ use Date::Manip qw/UnixDate/; use C4::Log; # logaction # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; -shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Print.pm b/C4/Print.pm index e7c7b32f45..91a56c096e 100644 --- a/C4/Print.pm +++ b/C4/Print.pm @@ -17,7 +17,6 @@ package C4::Print; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; require Exporter; @@ -31,9 +30,7 @@ use vars qw($VERSION @ISA @EXPORT); # set the version for version checking # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; - shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); -}; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Record.pm b/C4/Record.pm index ec00367676..0a740864b3 100644 --- a/C4/Record.pm +++ b/C4/Record.pm @@ -18,7 +18,6 @@ package C4::Record; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA # -# $Id$ # use strict;# use warnings; #FIXME: turn off warnings before release @@ -33,8 +32,7 @@ use XML::LibXML; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; - shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); }; +$VERSION = 3.00; @ISA = qw(Exporter); @@ -568,6 +566,5 @@ Joshua Ferraro =head1 MODIFICATIONS -# $Id$ =cut diff --git a/C4/Reserves.pm b/C4/Reserves.pm index d6bb83abf1..9e8398fb16 100644 --- a/C4/Reserves.pm +++ b/C4/Reserves.pm @@ -22,7 +22,6 @@ package C4::Reserves; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; require Exporter; @@ -37,7 +36,7 @@ our ($VERSION,@ISA,@EXPORT,@EXPORT_OK,%EXPORT_TAGS); my $library_name = C4::Context->preference("LibraryName"); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Review.pm b/C4/Review.pm index e49de4fae9..cbcef6a15a 100644 --- a/C4/Review.pm +++ b/C4/Review.pm @@ -24,7 +24,7 @@ use C4::Context; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v).".".join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Search.pm b/C4/Search.pm index e8df0521ae..272c16f3e0 100644 --- a/C4/Search.pm +++ b/C4/Search.pm @@ -26,9 +26,7 @@ use C4::Date; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; - shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); -}; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Serials.pm b/C4/Serials.pm index 6c93e8223f..8731434729 100644 --- a/C4/Serials.pm +++ b/C4/Serials.pm @@ -17,7 +17,6 @@ package C4::Serials; #assumes C4/Serials.pm # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; use C4::Date; diff --git a/C4/Stats.pm b/C4/Stats.pm index 4988ea8419..6c2be7441d 100644 --- a/C4/Stats.pm +++ b/C4/Stats.pm @@ -1,6 +1,5 @@ package C4::Stats; -# $Id$ # Copyright 2000-2002 Katipo Communications # @@ -25,9 +24,7 @@ use C4::Context; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = $VERSION = do { my @v = '$Revision$' =~ /\d+/g; - shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); -}; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Suggestions.pm b/C4/Suggestions.pm index b5503be28e..1cb215f844 100644 --- a/C4/Suggestions.pm +++ b/C4/Suggestions.pm @@ -17,7 +17,6 @@ package C4::Suggestions; # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; require Exporter; @@ -28,8 +27,7 @@ use Mail::Sendmail; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; - shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/VirtualShelves.pm b/C4/VirtualShelves.pm index 06bddb1874..8f1e19de72 100644 --- a/C4/VirtualShelves.pm +++ b/C4/VirtualShelves.pm @@ -3,7 +3,6 @@ package C4::VirtualShelves; -# $Id$ # Copyright 2000-2002 Katipo Communications # @@ -29,7 +28,7 @@ use C4::Circulation; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME diff --git a/C4/Z3950.pm b/C4/Z3950.pm index 6ea1f89857..32f4421fba 100644 --- a/C4/Z3950.pm +++ b/C4/Z3950.pm @@ -1,6 +1,5 @@ package C4::Z3950; -# $Id$ # Routines for handling Z39.50 lookups @@ -42,7 +41,7 @@ require Exporter; use vars qw($VERSION @ISA @EXPORT); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; shift(@v).".".join( "_", map { sprintf "%03d", $_ } @v ); }; +$VERSION = 3.00; =head1 NAME @@ -304,7 +303,6 @@ Koha Developement team =cut #-------------------------------------- -# $Log$ # Revision 1.14 2007/03/09 14:31:47 tipaul # rel_3_0 moved to HEAD # diff --git a/C4/tests/Record_test.pl b/C4/tests/Record_test.pl index 7b76fc6b02..578005681c 100755 --- a/C4/tests/Record_test.pl +++ b/C4/tests/Record_test.pl @@ -18,7 +18,6 @@ # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA # -# $Id$ # use strict; use warnings; #FIXME: turn off warnings before release @@ -137,6 +136,5 @@ Joshua Ferraro =head1 MODIFICATIONS -# $Id$ =cut diff --git a/cataloguing/value_builder/macles.pl b/cataloguing/value_builder/macles.pl index 2a6ff0109b..0913f5c6c1 100755 --- a/cataloguing/value_builder/macles.pl +++ b/cataloguing/value_builder/macles.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_field_003.pl b/cataloguing/value_builder/marc21_field_003.pl index 2325ffde64..5d7a7ef113 100755 --- a/cataloguing/value_builder/marc21_field_003.pl +++ b/cataloguing/value_builder/marc21_field_003.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_field_005.pl b/cataloguing/value_builder/marc21_field_005.pl index f3cff5f5f6..93fdc3e68d 100755 --- a/cataloguing/value_builder/marc21_field_005.pl +++ b/cataloguing/value_builder/marc21_field_005.pl @@ -1,7 +1,6 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_field_006.pl b/cataloguing/value_builder/marc21_field_006.pl index 332072b324..bf7f49fe7b 100755 --- a/cataloguing/value_builder/marc21_field_006.pl +++ b/cataloguing/value_builder/marc21_field_006.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_field_007.pl b/cataloguing/value_builder/marc21_field_007.pl index df8e093710..335f1d02eb 100755 --- a/cataloguing/value_builder/marc21_field_007.pl +++ b/cataloguing/value_builder/marc21_field_007.pl @@ -1,7 +1,6 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_field_008.pl b/cataloguing/value_builder/marc21_field_008.pl index 387729b82b..6ad1082a96 100755 --- a/cataloguing/value_builder/marc21_field_008.pl +++ b/cataloguing/value_builder/marc21_field_008.pl @@ -1,7 +1,6 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_field_008_authorities.pl b/cataloguing/value_builder/marc21_field_008_authorities.pl index 68fbf032db..9da4ae2cc3 100755 --- a/cataloguing/value_builder/marc21_field_008_authorities.pl +++ b/cataloguing/value_builder/marc21_field_008_authorities.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_field_040c.pl b/cataloguing/value_builder/marc21_field_040c.pl index bb58300327..417af784d3 100755 --- a/cataloguing/value_builder/marc21_field_040c.pl +++ b/cataloguing/value_builder/marc21_field_040c.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_field_040d.pl b/cataloguing/value_builder/marc21_field_040d.pl index bb58300327..417af784d3 100755 --- a/cataloguing/value_builder/marc21_field_040d.pl +++ b/cataloguing/value_builder/marc21_field_040d.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_leader.pl b/cataloguing/value_builder/marc21_leader.pl index 623ba60c6f..f9491b1cae 100755 --- a/cataloguing/value_builder/marc21_leader.pl +++ b/cataloguing/value_builder/marc21_leader.pl @@ -1,7 +1,6 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_leader_authorities.pl b/cataloguing/value_builder/marc21_leader_authorities.pl index 96e094c85e..a55384f81b 100755 --- a/cataloguing/value_builder/marc21_leader_authorities.pl +++ b/cataloguing/value_builder/marc21_leader_authorities.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_leader_book.pl b/cataloguing/value_builder/marc21_leader_book.pl index 13368344bb..9ef220e434 100755 --- a/cataloguing/value_builder/marc21_leader_book.pl +++ b/cataloguing/value_builder/marc21_leader_book.pl @@ -1,7 +1,6 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_leader_computerfile.pl b/cataloguing/value_builder/marc21_leader_computerfile.pl index 46d4c19341..05e2ff2cf6 100755 --- a/cataloguing/value_builder/marc21_leader_computerfile.pl +++ b/cataloguing/value_builder/marc21_leader_computerfile.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/marc21_leader_video.pl b/cataloguing/value_builder/marc21_leader_video.pl index 385723d986..fb6e4ccc7c 100755 --- a/cataloguing/value_builder/marc21_leader_video.pl +++ b/cataloguing/value_builder/marc21_leader_video.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_100.pl b/cataloguing/value_builder/unimarc_field_100.pl index 80187f2c94..5f8e36e853 100755 --- a/cataloguing/value_builder/unimarc_field_100.pl +++ b/cataloguing/value_builder/unimarc_field_100.pl @@ -1,7 +1,6 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_105.pl b/cataloguing/value_builder/unimarc_field_105.pl index 2f29e11d1d..ece7f22cfe 100755 --- a/cataloguing/value_builder/unimarc_field_105.pl +++ b/cataloguing/value_builder/unimarc_field_105.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_106.pl b/cataloguing/value_builder/unimarc_field_106.pl index 5723db977d..e32bd8d0b2 100755 --- a/cataloguing/value_builder/unimarc_field_106.pl +++ b/cataloguing/value_builder/unimarc_field_106.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_110.pl b/cataloguing/value_builder/unimarc_field_110.pl index 21f9641748..ff843dd697 100755 --- a/cataloguing/value_builder/unimarc_field_110.pl +++ b/cataloguing/value_builder/unimarc_field_110.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_115a.pl b/cataloguing/value_builder/unimarc_field_115a.pl index 30e448e120..1e7c2206d2 100755 --- a/cataloguing/value_builder/unimarc_field_115a.pl +++ b/cataloguing/value_builder/unimarc_field_115a.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_115b.pl b/cataloguing/value_builder/unimarc_field_115b.pl index 7d03bfdaaa..886c6afdea 100755 --- a/cataloguing/value_builder/unimarc_field_115b.pl +++ b/cataloguing/value_builder/unimarc_field_115b.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_116.pl b/cataloguing/value_builder/unimarc_field_116.pl index b011e6dfe5..c1c32a4cee 100755 --- a/cataloguing/value_builder/unimarc_field_116.pl +++ b/cataloguing/value_builder/unimarc_field_116.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_117.pl b/cataloguing/value_builder/unimarc_field_117.pl index 1bc50ef20d..0087646976 100755 --- a/cataloguing/value_builder/unimarc_field_117.pl +++ b/cataloguing/value_builder/unimarc_field_117.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_120.pl b/cataloguing/value_builder/unimarc_field_120.pl index e7242d0741..d5941fafef 100755 --- a/cataloguing/value_builder/unimarc_field_120.pl +++ b/cataloguing/value_builder/unimarc_field_120.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_121a.pl b/cataloguing/value_builder/unimarc_field_121a.pl index 512a80ada2..2b16b1284e 100755 --- a/cataloguing/value_builder/unimarc_field_121a.pl +++ b/cataloguing/value_builder/unimarc_field_121a.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_121b.pl b/cataloguing/value_builder/unimarc_field_121b.pl index 627b2c566a..2d14f84678 100755 --- a/cataloguing/value_builder/unimarc_field_121b.pl +++ b/cataloguing/value_builder/unimarc_field_121b.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_122.pl b/cataloguing/value_builder/unimarc_field_122.pl index ccc6e5f9a0..61b2702599 100755 --- a/cataloguing/value_builder/unimarc_field_122.pl +++ b/cataloguing/value_builder/unimarc_field_122.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_123a.pl b/cataloguing/value_builder/unimarc_field_123a.pl index 535f874501..f5e15155d6 100755 --- a/cataloguing/value_builder/unimarc_field_123a.pl +++ b/cataloguing/value_builder/unimarc_field_123a.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_123d.pl b/cataloguing/value_builder/unimarc_field_123d.pl index 12367c06f9..bf53007d0f 100755 --- a/cataloguing/value_builder/unimarc_field_123d.pl +++ b/cataloguing/value_builder/unimarc_field_123d.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_123e.pl b/cataloguing/value_builder/unimarc_field_123e.pl index 12367c06f9..bf53007d0f 100755 --- a/cataloguing/value_builder/unimarc_field_123e.pl +++ b/cataloguing/value_builder/unimarc_field_123e.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_123f.pl b/cataloguing/value_builder/unimarc_field_123f.pl index 0e6a0faeb8..12757331e1 100755 --- a/cataloguing/value_builder/unimarc_field_123f.pl +++ b/cataloguing/value_builder/unimarc_field_123f.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_123g.pl b/cataloguing/value_builder/unimarc_field_123g.pl index 12367c06f9..bf53007d0f 100755 --- a/cataloguing/value_builder/unimarc_field_123g.pl +++ b/cataloguing/value_builder/unimarc_field_123g.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_123i.pl b/cataloguing/value_builder/unimarc_field_123i.pl index 71ca35976d..06c37a0abd 100755 --- a/cataloguing/value_builder/unimarc_field_123i.pl +++ b/cataloguing/value_builder/unimarc_field_123i.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_123j.pl b/cataloguing/value_builder/unimarc_field_123j.pl index d8c5c1c0b1..e242782cae 100755 --- a/cataloguing/value_builder/unimarc_field_123j.pl +++ b/cataloguing/value_builder/unimarc_field_123j.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_124.pl b/cataloguing/value_builder/unimarc_field_124.pl index 38ac7e3729..0e1f654195 100755 --- a/cataloguing/value_builder/unimarc_field_124.pl +++ b/cataloguing/value_builder/unimarc_field_124.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_124a.pl b/cataloguing/value_builder/unimarc_field_124a.pl index 5b06ea9a8c..3562134890 100755 --- a/cataloguing/value_builder/unimarc_field_124a.pl +++ b/cataloguing/value_builder/unimarc_field_124a.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_124b.pl b/cataloguing/value_builder/unimarc_field_124b.pl index d6e3e0df1f..3c8090ea64 100755 --- a/cataloguing/value_builder/unimarc_field_124b.pl +++ b/cataloguing/value_builder/unimarc_field_124b.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_124c.pl b/cataloguing/value_builder/unimarc_field_124c.pl index 81ce4e9cdb..6dd8b55058 100755 --- a/cataloguing/value_builder/unimarc_field_124c.pl +++ b/cataloguing/value_builder/unimarc_field_124c.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_124d.pl b/cataloguing/value_builder/unimarc_field_124d.pl index df7e720130..19d9c72dfa 100755 --- a/cataloguing/value_builder/unimarc_field_124d.pl +++ b/cataloguing/value_builder/unimarc_field_124d.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_124e.pl b/cataloguing/value_builder/unimarc_field_124e.pl index d72bc14f9e..352f7db1dd 100755 --- a/cataloguing/value_builder/unimarc_field_124e.pl +++ b/cataloguing/value_builder/unimarc_field_124e.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_124f.pl b/cataloguing/value_builder/unimarc_field_124f.pl index e812439dff..d965565299 100755 --- a/cataloguing/value_builder/unimarc_field_124f.pl +++ b/cataloguing/value_builder/unimarc_field_124f.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_124g.pl b/cataloguing/value_builder/unimarc_field_124g.pl index 9af10d612b..bf4c199435 100755 --- a/cataloguing/value_builder/unimarc_field_124g.pl +++ b/cataloguing/value_builder/unimarc_field_124g.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_125.pl b/cataloguing/value_builder/unimarc_field_125.pl index 38ac7e3729..0e1f654195 100755 --- a/cataloguing/value_builder/unimarc_field_125.pl +++ b/cataloguing/value_builder/unimarc_field_125.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_125a.pl b/cataloguing/value_builder/unimarc_field_125a.pl index 83c8736dd1..a04c09f18f 100755 --- a/cataloguing/value_builder/unimarc_field_125a.pl +++ b/cataloguing/value_builder/unimarc_field_125a.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_125b.pl b/cataloguing/value_builder/unimarc_field_125b.pl index 0c8ada7e64..7ddd6e680e 100755 --- a/cataloguing/value_builder/unimarc_field_125b.pl +++ b/cataloguing/value_builder/unimarc_field_125b.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_126.pl b/cataloguing/value_builder/unimarc_field_126.pl index 38ac7e3729..0e1f654195 100755 --- a/cataloguing/value_builder/unimarc_field_126.pl +++ b/cataloguing/value_builder/unimarc_field_126.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_126a.pl b/cataloguing/value_builder/unimarc_field_126a.pl index a324caff35..6eb35e49db 100755 --- a/cataloguing/value_builder/unimarc_field_126a.pl +++ b/cataloguing/value_builder/unimarc_field_126a.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_126b.pl b/cataloguing/value_builder/unimarc_field_126b.pl index b611a0a26f..6e881472cf 100755 --- a/cataloguing/value_builder/unimarc_field_126b.pl +++ b/cataloguing/value_builder/unimarc_field_126b.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_127.pl b/cataloguing/value_builder/unimarc_field_127.pl index f9dc6a5670..beb559bdb6 100755 --- a/cataloguing/value_builder/unimarc_field_127.pl +++ b/cataloguing/value_builder/unimarc_field_127.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_128a.pl b/cataloguing/value_builder/unimarc_field_128a.pl index 1ccf664845..9bf7bd34d3 100755 --- a/cataloguing/value_builder/unimarc_field_128a.pl +++ b/cataloguing/value_builder/unimarc_field_128a.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_128b.pl b/cataloguing/value_builder/unimarc_field_128b.pl index 60e1293876..0c008d1a01 100755 --- a/cataloguing/value_builder/unimarc_field_128b.pl +++ b/cataloguing/value_builder/unimarc_field_128b.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_128c.pl b/cataloguing/value_builder/unimarc_field_128c.pl index a29f46eb42..721e11bfaf 100755 --- a/cataloguing/value_builder/unimarc_field_128c.pl +++ b/cataloguing/value_builder/unimarc_field_128c.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_130.pl b/cataloguing/value_builder/unimarc_field_130.pl index 7f59bc5060..f57b1ccbbe 100755 --- a/cataloguing/value_builder/unimarc_field_130.pl +++ b/cataloguing/value_builder/unimarc_field_130.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_135a.pl b/cataloguing/value_builder/unimarc_field_135a.pl index b05b9e7118..5a76b2aa5b 100755 --- a/cataloguing/value_builder/unimarc_field_135a.pl +++ b/cataloguing/value_builder/unimarc_field_135a.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_140.pl b/cataloguing/value_builder/unimarc_field_140.pl index 31d125344b..77e1a25bda 100755 --- a/cataloguing/value_builder/unimarc_field_140.pl +++ b/cataloguing/value_builder/unimarc_field_140.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_141.pl b/cataloguing/value_builder/unimarc_field_141.pl index d057a85952..a1fe7e3636 100755 --- a/cataloguing/value_builder/unimarc_field_141.pl +++ b/cataloguing/value_builder/unimarc_field_141.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_210c.pl b/cataloguing/value_builder/unimarc_field_210c.pl index 4cd2aa1a40..e982a02658 100755 --- a/cataloguing/value_builder/unimarc_field_210c.pl +++ b/cataloguing/value_builder/unimarc_field_210c.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_225a.pl b/cataloguing/value_builder/unimarc_field_225a.pl index d8b449300f..253cd91478 100755 --- a/cataloguing/value_builder/unimarc_field_225a.pl +++ b/cataloguing/value_builder/unimarc_field_225a.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_4XX.pl b/cataloguing/value_builder/unimarc_field_4XX.pl index deda256c9b..a7094c7b51 100755 --- a/cataloguing/value_builder/unimarc_field_4XX.pl +++ b/cataloguing/value_builder/unimarc_field_4XX.pl @@ -17,7 +17,6 @@ # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; require Exporter; diff --git a/cataloguing/value_builder/unimarc_field_60X.pl b/cataloguing/value_builder/unimarc_field_60X.pl index 189923cdba..0fe88944e5 100755 --- a/cataloguing/value_builder/unimarc_field_60X.pl +++ b/cataloguing/value_builder/unimarc_field_60X.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_field_700_701_702.pl b/cataloguing/value_builder/unimarc_field_700_701_702.pl index cf5d0d0cb9..9d554107bc 100755 --- a/cataloguing/value_builder/unimarc_field_700_701_702.pl +++ b/cataloguing/value_builder/unimarc_field_700_701_702.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/cataloguing/value_builder/unimarc_leader.pl b/cataloguing/value_builder/unimarc_leader.pl index 05a0a5e5c8..d3f42da7b3 100755 --- a/cataloguing/value_builder/unimarc_leader.pl +++ b/cataloguing/value_builder/unimarc_leader.pl @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Copyright 2000-2002 Katipo Communications # diff --git a/etc/zebradb/ccl.properties b/etc/zebradb/ccl.properties index 110345abfd..33e751d99c 100644 --- a/etc/zebradb/ccl.properties +++ b/etc/zebradb/ccl.properties @@ -1,5 +1,4 @@ # CCL field mappings -# $Id$ # There are four types of lines in a CCL profile: # 1. qualifier specification # qualifier-name [ attributeset ,] type = val [ attributeset ,] type = val ... diff --git a/etc/zebradb/pqf.properties b/etc/zebradb/pqf.properties index 9d1ff86747..73ef611e52 100644 --- a/etc/zebradb/pqf.properties +++ b/etc/zebradb/pqf.properties @@ -1,4 +1,3 @@ -# $Id$ # # Propeties file to drive org.z3950.zing.cql.CQLNode's toPQF() # back-end and the YAZ CQL-to-PQF converter. This specifies the diff --git a/installer/InstallAuth.pm b/installer/InstallAuth.pm index 632b8bdb78..12d8d53607 100644 --- a/installer/InstallAuth.pm +++ b/installer/InstallAuth.pm @@ -32,9 +32,7 @@ use CGI::Session; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); # set the version for version checking -$VERSION = do { my @v = '$Revision$' =~ /\d+/g; - shift(@v) . "." . join( "_", map { sprintf "%03d", $_ } @v ); -}; +$VERSION = 3.00; =head1 NAME diff --git a/koha-tmpl/errors/400.pl b/koha-tmpl/errors/400.pl index d2c28d33c3..431792b7f7 100755 --- a/koha-tmpl/errors/400.pl +++ b/koha-tmpl/errors/400.pl @@ -15,7 +15,6 @@ # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; use CGI; diff --git a/koha-tmpl/errors/401.pl b/koha-tmpl/errors/401.pl index 348906576f..937476581c 100755 --- a/koha-tmpl/errors/401.pl +++ b/koha-tmpl/errors/401.pl @@ -15,7 +15,6 @@ # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; use CGI; diff --git a/koha-tmpl/errors/402.pl b/koha-tmpl/errors/402.pl index f463fdcc8a..c7f66416cc 100755 --- a/koha-tmpl/errors/402.pl +++ b/koha-tmpl/errors/402.pl @@ -15,7 +15,6 @@ # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; use CGI; diff --git a/koha-tmpl/errors/403.pl b/koha-tmpl/errors/403.pl index b0b34fe0f7..b6ffe0dda4 100755 --- a/koha-tmpl/errors/403.pl +++ b/koha-tmpl/errors/403.pl @@ -15,7 +15,6 @@ # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; use CGI; diff --git a/koha-tmpl/errors/404.pl b/koha-tmpl/errors/404.pl index e4904d228f..ee0fb2a53e 100755 --- a/koha-tmpl/errors/404.pl +++ b/koha-tmpl/errors/404.pl @@ -15,7 +15,6 @@ # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; use CGI; diff --git a/koha-tmpl/errors/500.pl b/koha-tmpl/errors/500.pl index 545d570d09..f4341eda22 100755 --- a/koha-tmpl/errors/500.pl +++ b/koha-tmpl/errors/500.pl @@ -15,7 +15,6 @@ # Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place, # Suite 330, Boston, MA 02111-1307 USA -# $Id$ use strict; use CGI; diff --git a/koha-tmpl/intranet-tmpl/prog/en/lib/calendar/calendar.js b/koha-tmpl/intranet-tmpl/prog/en/lib/calendar/calendar.js index 96bec6f78e..028ad4a911 100644 --- a/koha-tmpl/intranet-tmpl/prog/en/lib/calendar/calendar.js +++ b/koha-tmpl/intranet-tmpl/prog/en/lib/calendar/calendar.js @@ -10,7 +10,6 @@ * Read the entire license text here: http://www.gnu.org/licenses/lgpl.html */ -// $Id$ /** The Calendar object constructor. */ Calendar = function (firstDayOfWeek, dateStr, onSelected, onClose) { diff --git a/koha-tmpl/intranet-tmpl/prog/fr/lib/calendar/calendar.js b/koha-tmpl/intranet-tmpl/prog/fr/lib/calendar/calendar.js index 96bec6f78e..028ad4a911 100644 --- a/koha-tmpl/intranet-tmpl/prog/fr/lib/calendar/calendar.js +++ b/koha-tmpl/intranet-tmpl/prog/fr/lib/calendar/calendar.js @@ -10,7 +10,6 @@ * Read the entire license text here: http://www.gnu.org/licenses/lgpl.html */ -// $Id$ /** The Calendar object constructor. */ Calendar = function (firstDayOfWeek, dateStr, onSelected, onClose) { diff --git a/misc/zebra/bib1_authorities.att b/misc/zebra/bib1_authorities.att index b67124955d..91a87525e8 100644 --- a/misc/zebra/bib1_authorities.att +++ b/misc/zebra/bib1_authorities.att @@ -1,4 +1,3 @@ -# $Id$ # auth1 Attribute Set name auth1 reference Bib-1 diff --git a/misc/zebra/bib1_biblios.att b/misc/zebra/bib1_biblios.att index 135dd504a8..bc0c5000e3 100644 --- a/misc/zebra/bib1_biblios.att +++ b/misc/zebra/bib1_biblios.att @@ -1,4 +1,3 @@ -# $Id$ # Bib-1 Attribute Set name bib1 reference Bib-1 diff --git a/misc/zebra/default.idx b/misc/zebra/default.idx index c88e83684b..f90733e407 100644 --- a/misc/zebra/default.idx +++ b/misc/zebra/default.idx @@ -1,5 +1,4 @@ # Zebra indexes as referred to from the *.abs-files. -# $Id$ # # Traditional word index diff --git a/misc/zebra/record_authorities_unimarc.abs b/misc/zebra/record_authorities_unimarc.abs index 4b6af66734..31a680ba13 100644 --- a/misc/zebra/record_authorities_unimarc.abs +++ b/misc/zebra/record_authorities_unimarc.abs @@ -1,4 +1,3 @@ -# $Id$ # indexing rules. It # results in a server which provides a passable Bath level 0 and 1 service diff --git a/misc/zebra/record_authorities_usmarc.abs b/misc/zebra/record_authorities_usmarc.abs index db0891e9cb..1a215fc7e7 100644 --- a/misc/zebra/record_authorities_usmarc.abs +++ b/misc/zebra/record_authorities_usmarc.abs @@ -1,4 +1,3 @@ -# $Id$ # This is a fairly simple example of a set of MARC21 Authority file indexing rules. #Although designed for MARC21 most probably very similar with UNIMARC. diff --git a/misc/zebra/record_biblios_unimarc.abs b/misc/zebra/record_biblios_unimarc.abs index 43503b37b6..a48ff85061 100644 --- a/misc/zebra/record_biblios_unimarc.abs +++ b/misc/zebra/record_biblios_unimarc.abs @@ -1,4 +1,3 @@ -# $Id$ # indexing rules. It # results in a server which provides a passable Bath level 0 and 1 service diff --git a/misc/zebra/record_biblios_usmarc.abs b/misc/zebra/record_biblios_usmarc.abs index e269a6b995..92b9c39aa8 100644 --- a/misc/zebra/record_biblios_usmarc.abs +++ b/misc/zebra/record_biblios_usmarc.abs @@ -1,4 +1,3 @@ -# $Id$ # This is a fairly simple example of a set of MARC21 indexing rules. It # results in a server which provides a passable Bath level 0 and 1 service diff --git a/misc/zebra/sort-string-utf_french.chr b/misc/zebra/sort-string-utf_french.chr index 69199d26ef..9fa9edabec 100644 --- a/misc/zebra/sort-string-utf_french.chr +++ b/misc/zebra/sort-string-utf_french.chr @@ -1,6 +1,5 @@ # Generic character map. # -# $Id$ encoding utf-8 diff --git a/t/Input.t b/t/Input.t old mode 100755 new mode 100644 diff --git a/updater/updatedatabase b/updater/updatedatabase index 4b07af7561..cc64ed3fe5 100755 --- a/updater/updatedatabase +++ b/updater/updatedatabase @@ -1,6 +1,5 @@ #!/usr/bin/perl -# $Id$ # Database Updater # This script checks for required updates to the database. @@ -347,5 +346,4 @@ sub SetVersion { } exit; -# $Log$ # Revision 1.172 2007/07/19 10:21:22 hdl -- 2.20.1