From: Mike Taylor Date: Fri, 11 May 2007 13:32:57 +0000 (+0000) Subject: Use cql_target() X-Git-Tag: CPAN-v1.02~406 X-Git-Url: http://jsfdemo.indexdata.com/cgi-bin?a=commitdiff_plain;h=7e87ee15785ae0693ec585186dce9e0a405f69d7;p=irspy-moved-to-github.git Use cql_target() --- diff --git a/web/htdocs/details/full.mc b/web/htdocs/details/full.mc index ada79e2..d5b1799 100644 --- a/web/htdocs/details/full.mc +++ b/web/htdocs/details/full.mc @@ -1,13 +1,11 @@ -%# $Id: full.mc,v 1.27 2007-04-27 14:04:40 mike Exp $ +%# $Id: full.mc,v 1.28 2007-05-11 13:32:57 mike Exp $ <%args> $id <%perl> my $conn = new ZOOM::Connection("localhost:8018/IR-Explain---1"); $conn->option(elementSetName => "zeerex"); -my $qid = $id; -$qid =~ s/"/\\"/g; -my $query = qq[rec.id="$qid"]; +my $query = cql_target($id); my $rs = $conn->search(new ZOOM::Query::CQL($query)); my $n = $rs->size(); if ($n == 0) {