[MOBY-guts] biomoby commit

Frank Gibbons fgibbons at pub.open-bio.org
Fri Sep 16 17:02:01 UTC 2005


fgibbons
Fri Sep 16 13:02:01 EDT 2005
Update of /home/repository/moby/moby-live/Perl/MOBY/Client
In directory pub.open-bio.org:/tmp/cvs-serv23935/MOBY/Client

Modified Files:
	CollectionArticle.pm 
Log Message:
 - No "title" in pod.

moby-live/Perl/MOBY/Client CollectionArticle.pm,1.11,1.12
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Client/CollectionArticle.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -r1.11 -r1.12
--- /home/repository/moby/moby-live/Perl/MOBY/Client/CollectionArticle.pm	2004/12/14 22:31:30	1.11
+++ /home/repository/moby/moby-live/Perl/MOBY/Client/CollectionArticle.pm	2005/09/16 17:02:01	1.12
@@ -8,7 +8,10 @@
 
 =head1 NAME
 
-MOBY::Client::CollectionArticle - a small object describing the Collection articles from the findService Response message of MOBY Central or representing the collection part of a MOBY invocation or response block
+MOBY::Client::CollectionArticle - a small object describing the
+Collection articles from the findService Response message of MOBY
+Central or representing the collection part of a MOBY invocation or
+response block
 
 =head1 SYNOPSIS
 
@@ -39,10 +42,6 @@
  }
 
  
- 
- 
-=cut
-
 =head1 DESCRIPTION
 
 This describes the Collection articles from either the findService Response of MOBY Central
@@ -86,14 +85,11 @@
 
 Mark Wilkinson (markw at illuminae dot com)
 
-=cut
-
 =head1 METHODS
 
 
 =head2 new
 
- Title     :	new
  Usage     :	my $IN = MOBY::Client::CollectionArticle->new(%args)
  Function  :	create CollectionArticle object
  Returns   :	MOBY::Client::SimpleArticle object
@@ -103,62 +99,44 @@
                 XML => $XML
                 XML_DOM => $XML::DOM::NODE
 
-=cut
-
 =head2 articleName
 
- Title     :	articleName
  Usage     :	$name = $IN->articleName($name)
  Function  :	get/set articleName
  Returns   :	string
  Arguments :    (optional) string to set articleName
 
-=cut
-
 =head2 Simples
 
- Title     :	Simples
  Usage     :	$type = $IN->Simples(\@SimpleArticles)
  Function  :	get/set name
  Returns   :	arrayRef of MOBY::Client::SimpleArticle's in this collection
  Arguments :    (optional) arrayRef of MOBY::Client::SimpleArticle's in this collection
 
-=cut
-
 =head2 addSimple
 
- Title     :	addSimple
  Usage     :	$namespaces = $IN->addNamespace($SimpleArticle)
  Function  :	add another SimpleArticle
  Returns   :	arrayref of MOBY::Client::SimpleArticle's or 0 if argument
                 was not a MOBY::Client::SimpleArticle (or other failure)
  Arguments :    a new MOBY::Client::SimpleArticle to add to collection
 
-=cut
-
 =head2 XML
 
- Title     :	XML
  Usage     :   $SA = $SA->XML($XML)
  Function  :	set/reset all parameters for this object from the XML
  Returns   :	MOBY::Client::SimpleArticle
  Arguments :    (optional) XML fragment from and including <Simple>...</Simple>
 
-=cut
-
 =head2 XML_DOM
 
- Title     :	XML_DOM
  Usage     :	$namespaces = $SA->XML_DOM($XML_DOM_NODE)
  Function  :	set/reset all parameters for this object from the XML::DOM node for <Simple>
  Returns   :	MOBY::Client::SimpleArticle
  Arguments :    (optional) an $XML::DOM node from the <Simple> article of a DOM
 
-=cut
-
 =head2 isSimple
 
- Title     :	isSimple
  Usage     :	$boolean = $IN->isSimple()
  Function  :	is this a SimpleArticle type
                 (yes, I know this is obvious, but since you can
@@ -167,11 +145,8 @@
                  to test what you have in-hand)
  Returns   :	0 (false)
 
-=cut
-
 =head2 isCollection
 
- Title     :	isCollection
  Usage     :	$boolean = $IN->isCollection()
  Function  :	is this a CollectionArticle type
                 (yes, I know this is obvious, but since you can
@@ -180,11 +155,8 @@
                  to test what you have in-hand)
  Returns   :	1 (true)
 
-=cut
-
 =head2 isSecondary
 
- Title     :	isSecondary
  Usage     :	$boolean = $IN->isSecondary()
  Function  :	is this a SecondaryArticle type?
                 (yes, I know this is obvious)
@@ -198,10 +170,10 @@
 	# DATA
 	#___________________________________________________________
 	#ATTRIBUTES
-	my %_attr_data =    #     				DEFAULT    	ACCESSIBILITY
+	my %_attr_data =    #   DEFAULT    	ACCESSIBILITY
 	  (
-		articleName => [ undef, 'read/write' ],
-		Simples => [ [], 'read/write' ],
+		articleName =>  [ undef, 'read/write' ],
+		Simples =>      [ [],    'read/write' ],
 		isSimple     => [ 0,     'read' ],
 		isSecondary  => [ 0,     'read' ],
 		isCollection => [ 1,     'read' ],




More information about the MOBY-guts mailing list