[MOBY-guts] biomoby commit

[Eddie Kawas]

kawas
Wed Jan 28 09:35:41 EST 2009
Update of /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client
In directory dev.open-bio.org:/tmp/cvs-serv15881/Perl/MOBY-Server/lib/MOBY/Client

Modified Files:
	SimpleArticle.pm SimpleInput.pm SecondaryArticle.pm 
	CollectionArticle.pm 
Log Message:
encapsulated class data had memory for attributes that defaulted to []. Made them 'undef' to remove this memory.
moby-live/Perl/MOBY-Server/lib/MOBY/Client SimpleArticle.pm,1.3,1.4 SimpleInput.pm,1.4,1.5 SecondaryArticle.pm,1.4,1.5 CollectionArticle.pm,1.4,1.5
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/SimpleArticle.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/Client/SimpleArticle.pm	2008/09/02 13:11:40	1.3
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/SimpleArticle.pm	2009/01/28 14:35:41	1.4
@@ -195,10 +195,10 @@
 	#ATTRIBUTES
 	my %_attr_data =    #     				DEFAULT    	ACCESSIBILITY
 	  (
-		articleName => [ undef, 'read/write' ],
-		objectType  => [ undef, 'read/write' ],
-		objectLSID  => [ undef, 'read/write' ],
-		namespaces => [ [], 'read/write' ],
+		articleName  => [ undef, 'read/write' ],
+		objectType   => [ undef, 'read/write' ],
+		objectLSID   => [ undef, 'read/write' ],
+		namespaces   => [ undef, 'read/write' ],
 		id           => [ undef, 'read/write' ],
 		XML_DOM      => [ undef, 'read/write' ],
 		XML          => [ undef, 'read/write' ],

===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/SimpleInput.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/SimpleInput.pm	2008/09/02 13:11:40	1.4
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/SimpleInput.pm	2009/01/28 14:35:41	1.5
@@ -86,7 +86,7 @@
 	  (
 		articleName => [ undef, 'read/write' ],
 		objectType  => [ undef, 'read/write' ],
-		namespaces => [ [], 'read/write' ],
+		namespaces => [ undef, 'read/write' ],
 	  );
 
 	#_____________________________________________________________

===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/SecondaryArticle.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/SecondaryArticle.pm	2008/09/02 13:11:40	1.4
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/SecondaryArticle.pm	2009/01/28 14:35:41	1.5
@@ -175,7 +175,7 @@
 	  (
 		articleName  => [ undef, 'read/write' ],
 		objectType   => [ undef, 'read/write' ],
-		namespaces   => [ [], 'read/write' ],
+		namespaces   => [ undef, 'read/write' ],
 		XML_DOM      => [ undef, 'read/write' ],
 		XML          => [ undef, 'read/write' ],
 		isSecondary  => [ 1,     'read' ],

===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/CollectionArticle.pm,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/CollectionArticle.pm	2008/11/19 21:29:14	1.4
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/Client/CollectionArticle.pm	2009/01/28 14:35:41	1.5
@@ -188,7 +188,7 @@
 	my %_attr_data =    #   DEFAULT    	ACCESSIBILITY
 	  (
 		articleName =>  [ undef, 'read/write' ],
-		Simples =>      [ [],    'read/write' ],
+		Simples =>      [ undef,    'read/write' ],
 		isSimple     => [ 0,     'read' ],
 		isSecondary  => [ 0,     'read' ],
 		isCollection => [ 1,     'read' ],