X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.web-live.git;a=blobdiff_plain;f=yarrg%2Fweb%2Flookup;h=469f22835fe06da65e5a41807b5c94c13b0019cf;hp=ae22b33002965655492c2bc2b12682670853f1a8;hb=2961c979e0f7bdae7183d49ab7fab5f5830dff4e;hpb=b511dc5359d8c85c05b4bd3421e9f47a989693ce
diff --git a/yarrg/web/lookup b/yarrg/web/lookup
index ae22b33..469f228 100644
--- a/yarrg/web/lookup
+++ b/yarrg/web/lookup
@@ -50,7 +50,7 @@ foreach my $var (@vars) {
<% ucfirst $ahtml{Query} %> - YARRG
-YARRG -
+YARRG -
Yet Another Revenue Research Gatherer
<%perl>
@@ -72,7 +72,7 @@ foreach my $var (keys %ARGS) {
}
my $quri= sub {
- my $uri= URI->new($m->current_comp()->name());
+ my $uri= URI->new('lookup');
$uri->query_form(@_);
$uri->path_query();
};
@@ -226,7 +226,7 @@ foreach my $arch (keys %islandlistdata) {
-
+