[Bioperl-guts-l] bioperl-live/Bio/DB/Biblio soap.pm, 1.12, 1.13 biofetch.pm, 1.14, 1.15
Torsten Seemann
tseemann at dev.open-bio.org
Mon Oct 2 00:34:54 EDT 2006
Update of /home/repository/bioperl/bioperl-live/Bio/DB/Biblio
In directory dev.open-bio.org:/tmp/cvs-serv22886/Bio/DB/Biblio
Modified Files:
soap.pm biofetch.pm
Log Message:
Removed unused "use vars ($Revision); $Revision = ...."
Index: biofetch.pm
===================================================================
RCS file: /home/repository/bioperl/bioperl-live/Bio/DB/Biblio/biofetch.pm,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -d -r1.14 -r1.15
*** biofetch.pm 29 Sep 2006 04:05:49 -0000 1.14
--- biofetch.pm 2 Oct 2006 04:34:52 -0000 1.15
***************
*** 93,97 ****
package Bio::DB::Biblio::biofetch;
use vars qw(%HOSTS %FORMATMAP $DEFAULTFORMAT $DEFAULTRETRIEVAL_TYPE
! $Revision $DEFAULT_SERVICE $DEFAULT_NAMESPACE);
use strict;
--- 93,97 ----
package Bio::DB::Biblio::biofetch;
use vars qw(%HOSTS %FORMATMAP $DEFAULTFORMAT $DEFAULTRETRIEVAL_TYPE
! $DEFAULT_SERVICE $DEFAULT_NAMESPACE);
use strict;
***************
*** 102,107 ****
BEGIN {
- $Revision = q[$Id$];
-
# you can add your own here theoretically.
%HOSTS = (
--- 102,105 ----
Index: soap.pm
===================================================================
RCS file: /home/repository/bioperl/bioperl-live/Bio/DB/Biblio/soap.pm,v
retrieving revision 1.12
retrieving revision 1.13
diff -C2 -d -r1.12 -r1.13
*** soap.pm 26 Sep 2006 22:03:06 -0000 1.12
--- soap.pm 2 Oct 2006 04:34:52 -0000 1.13
***************
*** 97,101 ****
package Bio::DB::Biblio::soap;
! use vars qw($Revision $DEFAULT_SERVICE $DEFAULT_NAMESPACE);
use strict;
--- 97,101 ----
package Bio::DB::Biblio::soap;
! use vars qw($DEFAULT_SERVICE $DEFAULT_NAMESPACE);
use strict;
***************
*** 114,119 ****
BEGIN {
- $Revision = q[$Id$];
-
# where to go...
$DEFAULT_SERVICE = 'http://www.ebi.ac.uk/openbqs/services/MedlineSRS';
--- 114,117 ----
More information about the Bioperl-guts-l
mailing list