[MOBY-guts] biomoby commit
Eddie Kawas
kawas at dev.open-bio.org
Tue Sep 2 13:10:26 UTC 2008
kawas
Tue Sep 2 09:10:26 EDT 2008
Update of /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Async
In directory dev.open-bio.org:/tmp/cvs-serv21682/Perl/MOBY-Server/lib/MOBY/Async
Modified Files:
SimpleServer.pm LSAE.pm Service.pm
Log Message:
added $VERSION numbers to the modules.
moby-live/Perl/MOBY-Server/lib/MOBY/Async SimpleServer.pm,1.3,1.4 LSAE.pm,1.2,1.3 Service.pm,1.3,1.4
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Async/SimpleServer.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Async/SimpleServer.pm 2008/09/01 18:53:57 1.3
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Async/SimpleServer.pm 2008/09/02 13:10:26 1.4
@@ -99,6 +99,9 @@
use base qw(WSRF::FileBasedMobyResourceLifetimes);
+use vars qw /$VERSION/;
+$VERSION = sprintf "%d.%02d", q$Revision$ =~ /: (\d+)\.(\d+)/;
+
#===============================================================================
# async_create
#
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Async/LSAE.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Async/LSAE.pm 2008/04/23 13:08:11 1.2
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Async/LSAE.pm 2008/09/02 13:10:26 1.3
@@ -199,6 +199,9 @@
use XML::LibXML;
use Exporter;
+use vars qw /$VERSION/;
+$VERSION = sprintf "%d.%02d", q$Revision$ =~ /: (\d+)\.(\d+)/;
+
use base qw(Exporter);
our @EXPORT = qw(
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Async/Service.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -r1.3 -r1.4
--- /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Async/Service.pm 2008/09/01 18:53:57 1.3
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Async/Service.pm 2008/09/02 13:10:26 1.4
@@ -135,6 +135,9 @@
use MOBY::Client::Service;
use base qw(MOBY::Client::Service);
+use vars qw /$VERSION/;
+$VERSION = sprintf "%d.%02d", q$Revision$ =~ /: (\d+)\.(\d+)/;
+
sub _getPollingTime($$$@);
sub _getServiceEndpoint($);
sub _getPseudoRandomPollingTime($$);
More information about the MOBY-guts
mailing list