projects
/
irspy-moved-to-github.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add the field disabled:
[irspy-moved-to-github.git]
/
web
/
htdocs
/
details
/
delete.mc
diff --git
a/web/htdocs/details/delete.mc
b/web/htdocs/details/delete.mc
index
2b7effd
..
fce37c1
100644
(file)
--- a/
web/htdocs/details/delete.mc
+++ b/
web/htdocs/details/delete.mc
@@
-1,4
+1,3
@@
-%# $Id: delete.mc,v 1.7 2007-06-27 11:09:32 mike Exp $
<%args>
$id
$really => 0
<%args>
$id
$really => 0
@@
-10,12
+9,13
@@
$really => 0
<% xml_encode($id) %>?
</p>
<p>
<% xml_encode($id) %>?
</p>
<p>
- <a href="?really=1&id=<% xml_encode(uri_escape($id)) %>">Yes</a><br/>
- <a href="/full.html?id=<% xml_encode(uri_escape($id)) %>">No</a><br/>
+ <a href="?really=1&id=<% xml_encode(uri_escape_utf8($id)) %>">Yes</a><br/>
+ <a href="/full.html?id=<% xml_encode(uri_escape_utf8($id)) %>">No</a><br/>
</p>
% } else {
<%perl>
</p>
% } else {
<%perl>
- 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::_delete_record($conn, $id);
user => "admin", password => "fruitbat",
elementSetName => "zeerex");
ZOOM::IRSpy::_delete_record($conn, $id);