-%# $Id: upload.mc,v 1.3 2009-04-16 18:09:44 wosch Exp $
<%args>
$filename => undef
</%args>
my $xml = join("", <$fin>);
my $xc = irspy_xpath_context($xml);
my $id = irspy_record2identifier($xc);
-my $conn = new ZOOM::Connection("localhost:8018/IR-Explain---1", 0,
+my $db = ZOOM::IRSpy::connect_to_registry();
+my $conn = new ZOOM::Connection($db, 0,
user => "admin", password => "fruitbat",
elementSetName => "zeerex");
ZOOM::IRSpy::_rewrite_zeerex_record($conn, $xc->getContextNode());
</p>
<p>
Proceed to
- <a href="<% xml_encode("/full.html?id=" . uri_escape($id))
+ <a href="<% xml_encode("/full.html?id=" . uri_escape_utf8($id))
%>">the new record</a>.
</p>