From 5df374af752706871e9a19d5b51df19f227b7f91 Mon Sep 17 00:00:00 2001
From: Len Kranendonk <len@webgui-svn>
Date: Mon, 8 Nov 2004 15:52:35 +0000
Subject: [PATCH] Added a javascript confirmation popup for delete icon

---
 lib/WebGUI/Operation/Root.pm |  2 +-
 lib/WebGUI/Wobject.pm        | 22 ----------------------
 2 files changed, 1 insertion(+), 23 deletions(-)

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] = '<tr><td valign="top" class="tableData">'
-			.deleteIcon('op=deletePage',$data{urlizedTitle})
+			.deleteIcon('op=deletePageConfirm',$data{urlizedTitle},WebGUI::International::get(101))
 			.editIcon('op=editPage',$data{urlizedTitle})
 			.cutIcon('op=cutPage',$data{urlizedTitle})
 			.'</td>';
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 .= '<p>';
-        $output .= '<div align="center"><a href="'.WebGUI::URL::page('func=deleteConfirm&wid='. $self->get("wobjectId")).'">';
-	$output .= WebGUI::International::get(44); 
-	$output .= '</a>';
-        $output .= '&nbsp;&nbsp;&nbsp;&nbsp;<a href="'.WebGUI::URL::page().'">';
-	$output .= WebGUI::International::get(45);
-	$output .= '</a></div>';
-        return $self->adminConsole($output,'42',"wobject delete","WebGUI");
-}
-
-#-------------------------------------------------------------------
-
 =head2  www_deleteConfirm ( )
 
 Moves this instance to the trash.