[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Mon Jul 14 13:35:55 EDT 2003
Update of /home/repository/moby/moby-live/Perl/MOBY
In directory pub.open-bio.org:/tmp/cvs-serv1222/Perl/MOBY

Modified Files:
	CommonSubs.pm 
Log Message:
ack\!  forgot to export the subroutines.  Bonehead

moby-live/Perl/MOBY CommonSubs.pm,1.4,1.5
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/CommonSubs.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- /home/repository/moby/moby-live/Perl/MOBY/CommonSubs.pm	2003/07/14 16:00:18	1.4
+++ /home/repository/moby/moby-live/Perl/MOBY/CommonSubs.pm	2003/07/14 17:35:55	1.5
@@ -63,7 +63,15 @@
 require Exporter;
 @ISA = qw(Exporter);
 @EXPORT_OK = qw(mysub);
-%EXPORT_TAGS =(all => [qw(mysub)]);
+%EXPORT_TAGS =(all => [qw(
+    getSimpleArticleIDs
+    getSimpleArticleNamespaceURI
+    simpleResponse
+    responseHeader
+    responseFooter
+    getInputArticles
+    getNodeContentWithArticle
+    )]);
 
 
 #################################################
@@ -311,7 +319,7 @@
 
 sub getInputArticles {
 
-	my ($self, $XML) = @_;
+	my ($XML) = @_;
     my $parser = new XML::DOM::Parser;
     my $doc = $parser->parse($XML);
     my $moby = $doc->getDocumentElement();