From a3aeb4a30e44ade41a2d9f43dbd7890ef58b27ec Mon Sep 17 00:00:00 2001 From: =?utf8?q?Ale=C5=A1=20K=C5=99enek?= Date: Thu, 7 Jun 2007 11:11:57 +0000 Subject: [PATCH] any origin --- org.glite.jp.index/examples/pch06/pch.pm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/org.glite.jp.index/examples/pch06/pch.pm b/org.glite.jp.index/examples/pch06/pch.pm index cbfd5af..cfd17aa 100644 --- a/org.glite.jp.index/examples/pch06/pch.pm +++ b/org.glite.jp.index/examples/pch06/pch.pm @@ -59,8 +59,6 @@ sub isquery { if ($attributes) { @attributes = @$attributes; } else { @attributes = @default_is_attributes; } - $origin = 'USER' unless $origin; - $s = $isquery[0]; foreach my $query (@$queries) { my @query = @$query; @@ -69,7 +67,7 @@ sub isquery { $s .= "\t$query[0]\n"; while ($i <= $#query) { my @record = @{$query[$i]}; - $s .= "\t$origin\n"; + $s .= "\t$origin\n" if $origin; $s .= "\t\n"; $s .= "\t\t$record[0]\n"; $s .= "\t\t$record[1]\n"; -- 1.8.2.3