- sprintf ("SELECT source FROM %s WHERE value LIKE \"%s\" UNION "^^
- "SELECT source FROM %s WHERE value LIKE \"%s\"")
- (MetadataTypes.name_tbl ()) sql_pat
- MetadataTypes.library_name_tbl sql_pat
+ sprintf
+ ("SELECT source FROM %s WHERE value LIKE \"%s\" ESCAPE \"\\\" "
+ ^^ "UNION " ^^
+ "SELECT source FROM %s WHERE value LIKE \"%s\" ESCAPE \"\\\" ")
+ (MetadataTypes.name_tbl ()) (escape sql_pat)
+ MetadataTypes.library_name_tbl (escape sql_pat)