X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fchrome%2Flayout.mc;h=6b9ec12e4406f1cc03596b7f0bdb580ec48a9c9e;hb=ec843af3f7781990f5c8597a4a8c0eae148618f9;hp=3a62bf12cbfeff8e3e16088438fa6e5f1e3e33ca;hpb=d5a78c57cbd06e19c3186999a05172a8aa9eb6d7;p=irspy-moved-to-github.git diff --git a/web/htdocs/chrome/layout.mc b/web/htdocs/chrome/layout.mc index 3a62bf1..6b9ec12 100644 --- a/web/htdocs/chrome/layout.mc +++ b/web/htdocs/chrome/layout.mc @@ -1,4 +1,4 @@ -%# $Id: layout.mc,v 1.23 2007-02-20 19:20:23 mike Exp $ +%# $Id: layout.mc,v 1.25 2007-03-29 11:20:56 mike Exp $ <%args> $debug => undef $title @@ -8,7 +8,7 @@ $component use URI::Escape; use ZOOM; use ZOOM::IRSpy::Web; -use ZOOM::IRSpy::Utils qw(isodate xml_encode cql_quote cql_target +use ZOOM::IRSpy::Utils qw(isodate xml_encode cql_target irspy_xpath_context modify_xml_document bib1_access_point); @@ -66,6 +66,7 @@ use ZOOM::IRSpy::Utils qw(isodate xml_encode cql_quote cql_target % foreach my $i ('a' .. 'z') { <% uc($i) %> % } + [Others]

<%perl> my $id = $r->param("id");