From f52bf1decb62d7b22d6681bf211dbca8768127a0 Mon Sep 17 00:00:00 2001 From: Stefano Zacchiroli Date: Wed, 19 Jul 2006 17:30:32 +0000 Subject: [PATCH] use double quotes around escaped URIs, single quotes fail when the URI contains a '\'' character --- helm/software/components/metadata/sqlStatements.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/helm/software/components/metadata/sqlStatements.ml b/helm/software/components/metadata/sqlStatements.ml index 5469aebb8..86cffbd1b 100644 --- a/helm/software/components/metadata/sqlStatements.ml +++ b/helm/software/components/metadata/sqlStatements.ml @@ -205,10 +205,10 @@ let move_content (name1, tbl1) (name2, tbl2) buri = name2 name1 (HMysql.escape buri) let direct_deps refObj uri = - sprintf "SELECT * FROM %s WHERE source = '%s';" + sprintf "SELECT * FROM %s WHERE source = \"%s\";" (HMysql.escape refObj) (UriManager.string_of_uri uri) let inverse_deps refObj uri = - sprintf "SELECT * FROM %s WHERE h_occurrence = '%s';" + sprintf "SELECT * FROM %s WHERE h_occurrence = \"%s\";" (HMysql.escape refObj) (UriManager.string_of_uri uri) -- 2.39.2