X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=web%2Fhtdocs%2Fraw.html;h=063f9b624f9529087f3dd04e4c224a9c72496681;hp=8d8eb21ffdf99b44721149bff72b77b57ab1f2dc;hb=1096fc15fbdeb947e5c0c5c14ff39630e0a23e35;hpb=434ef37c3d05ce08a58bfabd7f0ee24246df18a6 diff --git a/web/htdocs/raw.html b/web/htdocs/raw.html index 8d8eb21..063f9b6 100644 --- a/web/htdocs/raw.html +++ b/web/htdocs/raw.html @@ -1,4 +1,4 @@ -%# $Id: raw.html,v 1.1 2006-09-19 11:11:33 mike Exp $ +%# $Id: raw.html,v 1.3 2006-09-25 16:37:55 mike Exp $ <%args> $id @@ -6,9 +6,11 @@ $id use ZOOM; <%perl> -my $conn = new ZOOM::Connection("localhost:1313/IR-Explain---1"); +my $conn = new ZOOM::Connection("localhost:3313/IR-Explain---1"); $conn->option(elementSetName => "zeerex"); -my $query = qq[rec.id="$id"]; +my $qid = $id; +$qid =~ s/"/\\"/g; +my $query = qq[rec.id="$qid"]; my $rs = $conn->search(new ZOOM::Query::CQL($query)); my $n = $rs->size(); if ($n == 0) {