From f9cb737af4ce7d7be4ff82a7abcf7c603a2c1a11 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Ale=C5=A1=20K=C5=99enek?= Date: Wed, 6 Jun 2007 15:48:01 +0000 Subject: [PATCH] adapt to head --- org.glite.jp.index/examples/pch06/pch.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/org.glite.jp.index/examples/pch06/pch.pm b/org.glite.jp.index/examples/pch06/pch.pm index e8bf688..9183f62 100644 --- a/org.glite.jp.index/examples/pch06/pch.pm +++ b/org.glite.jp.index/examples/pch06/pch.pm @@ -35,9 +35,9 @@ my @default_is_attributes = ( ); my @isquery = ( ' - + ', -' +' ' ); @@ -67,6 +67,7 @@ sub isquery { $s .= "\t$query[0]\n"; while ($i <= $#query) { my @record = @{$query[$i]}; + $s .= "\tUSER\n"; $s .= "\t\n"; $s .= "\t\t$record[0]\n"; $s .= "\t\t$record[1]\n"; -- 1.8.2.3