[MOBY-guts] biomoby commit

[Eddie Kawas]

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

Modified Files:
	Utils.pm 
Log Message:
fixed typo in the ref ($self)  =~ m// statement
moby-live/Perl/MOBY-Server/lib/MOBY/RDF Utils.pm,1.8,1.9
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/RDF/Utils.pm,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -r1.8 -r1.9
--- /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/RDF/Utils.pm	2008/11/25 18:05:59	1.8
+++ /home/repository/moby/moby-live/Perl/MOBY-Server/lib/MOBY/RDF/Utils.pm	2009/01/28 14:38:41	1.9
@@ -180,7 +180,9 @@
 sub trim {
 	my ($self, $text) = @_;
 	$text = $self 
-		unless (ref($self) eq 'Moby::RDF::Utils') and defined($text);
+		unless ref($self) =~ m/^MOBY::RDF::Utils/;
+	# return empty string if $text is not defined
+	return "" unless $text;
 	$text =~ s/^\s+//;
 	$text =~ s/\s+$//;
 	return $text;