X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=web%2Fhtdocs%2Fdetails%2Ffound.mc;h=7df2dff5a1518242c5d946c62f38ba1b94f328b6;hp=ebe7367de7356477ca76fb466bfe6a68668e23c5;hb=07bd6ea6c324b2707538656eb0526a223826922d;hpb=4251adda38740fd055badc12ee9996c63bc37c90 diff --git a/web/htdocs/details/found.mc b/web/htdocs/details/found.mc index ebe7367..7df2dff 100644 --- a/web/htdocs/details/found.mc +++ b/web/htdocs/details/found.mc @@ -1,7 +1,5 @@ -%# $Id: found.mc,v 1.15 2006-10-20 16:57:23 mike Exp $ +%# $Id: found.mc,v 1.20 2006-11-16 17:10:30 mike Exp $ <%once> -use URI::Escape; - sub print_navlink { my($params, $cond, $caption, $skip) = @_; @@ -79,10 +77,10 @@ my $first = $skip+1; my $last = $first+$count-1; $last = $n if $last > $n; -
+

-

+

% if ($n == 0) { No matches @@ -112,8 +110,7 @@ print_navlink(\%params, $last < $n, "Next", $skip+$count); % my @ids; % foreach my $i ($first .. $last) { <%perl> -my $rec = $rs->record($i-1); -my $xc = irspy_xpath_context($rec); +my $xc = irspy_xpath_context($rs->record($i-1)); my $title = $xc->find("e:databaseInfo/e:title"); my $author = $xc->find("e:databaseInfo/e:author"); my $host = $xc->find("e:serverInfo/e:host"); @@ -127,18 +124,18 @@ push @ids, $id; <% $i %> <% xml_encode($title) %> - <% xml_encode($author) %> - <% xml_encode($host) %> - <% xml_encode($port) %> - <% xml_encode($db) %> + %>"><% xml_encode($title, "[untitled]") %> + <% xml_encode($author, "") %> + <% xml_encode($host, "") %> + <% xml_encode($port, "") %> + <% xml_encode($db, "") %> T" title="Test this target">Test E" title="Edit this target's record">Edit X + %>" title="Raw XML record">XML % }