-%# $Id: layout.mc,v 1.23 2007-02-20 19:20:23 mike Exp $
+%# $Id: layout.mc,v 1.28 2007-04-17 08:41:07 mike Exp $
<%args>
$debug => undef
$title
$component
</%args>
<%once>
-use URI::Escape;
+use URI::Escape qw(uri_escape uri_escape_utf8);
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 cql_quote
irspy_xpath_context modify_xml_document
bib1_access_point);
</%once>
% foreach my $i ('a' .. 'z') {
<a href="/find.html?dc.title=^<% $i %>*&_sort=dc.title&_count=9999&_search=Search"><tt><% uc($i) %></tt></a>
% }
+ <a href="/find.html?cql.allRecords=1+not+dc.title+=/regexp/firstInField+[a-z].*&_sort=dc.title&_count=9999&_search=Search"">[Others]</a>
</p>
<%perl>
my $id = $r->param("id");