[MOBY-guts] biomoby commit

[Mark Wilkinson]

mwilkinson
Tue Jul 26 19:36:26 EDT 2005
Update of /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi
In directory pub.open-bio.org:/tmp/cvs-serv25882/MOBY/Adaptor/moby/queryapi

Modified Files:
	mysql.pm 
Log Message:
fixing spaces in SQL

moby-live/Perl/MOBY/Adaptor/moby/queryapi mysql.pm,1.39,1.40
===================================================================
RCS file: /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi/mysql.pm,v
retrieving revision 1.39
retrieving revision 1.40
diff -u -r1.39 -r1.40
--- /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi/mysql.pm	2005/07/26 23:32:48	1.39
+++ /home/repository/moby/moby-live/Perl/MOBY/Adaptor/moby/queryapi/mysql.pm	2005/07/26 23:36:26	1.40
@@ -917,9 +917,9 @@
 	return [{}] unless $type;
 	my $condition = "";
 	if ($type =~ /^urn\:lsid/){
-	    $condition = "where relationship_lsid = ? and ";
+	    $condition = " where relationship_lsid = ? and ";
 	} elsif ($type) {
-	    $condition = "where relationship_type = ? and";
+	    $condition = " where relationship_type = ? and ";
 	}
 	my $ont = $args{ontology};
 	
@@ -949,9 +949,9 @@
 	return [{}] unless $type;
 	my $condition = "";
 	if ($type =~ /^urn\:lsid/){
-	    $condition = "where namespace_lsid = ? and ";
+	    $condition = " where namespace_lsid = ? and ";
 	} elsif ($type) {
-	    $condition = "where namespace_type = ? and";
+	    $condition = " where namespace_type = ? and";
 	}
 	my $dbh = $self->dbh;