diff --git a/lib/WebGUI/Operation/Root.pm b/lib/WebGUI/Operation/Root.pm
index 45cec077a..65140121b 100644
--- a/lib/WebGUI/Operation/Root.pm
+++ b/lib/WebGUI/Operation/Root.pm
@@ -39,7 +39,7 @@ sub www_listRoots {
$sth = WebGUI::SQL->read("select * from page where title<>'Reserved' and parentId='0' order by title");
while (%data = $sth->hash) {
$row[$i] = '
| '
- .deleteIcon('op=deletePage',$data{urlizedTitle})
+ .deleteIcon('op=deletePageConfirm',$data{urlizedTitle},WebGUI::International::get(101))
.editIcon('op=editPage',$data{urlizedTitle})
.cutIcon('op=cutPage',$data{urlizedTitle})
.' | ';
diff --git a/lib/WebGUI/Wobject.pm b/lib/WebGUI/Wobject.pm
index 6798aca86..c27b66a21 100644
--- a/lib/WebGUI/Wobject.pm
+++ b/lib/WebGUI/Wobject.pm
@@ -1165,28 +1165,6 @@ sub www_cut {
#-------------------------------------------------------------------
-=head2 www_delete ( )
-
-Prompts a user to confirm whether they wish to delete this instance.
-
-=cut
-
-sub www_delete {
- my $self = shift;
- return WebGUI::Privilege::insufficient() unless ($self->canEdit);
- my $output = WebGUI::International::get(43);
- $output .= '';
- $output .= '
';
- return $self->adminConsole($output,'42',"wobject delete","WebGUI");
-}
-
-#-------------------------------------------------------------------
-
=head2 www_deleteConfirm ( )
Moves this instance to the trash.