oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Added a javascript confirmation popup for delete icon

Browse source
This commit is contained in:
Len Kranendonk 2004-11-08 15:10:46 +00:00
parent 013554078b
commit 0fb088c22d
1 changed files with 13 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

16
lib/WebGUI/Icon.pm
View file

@ -133,7 +133,7 @@ sub cutIcon {
#-------------------------------------------------------------------
=head2 deleteIcon ( urlParameters [, pageURL ] )
=head2 deleteIcon ( urlParameters [, pageURL, confirmText ] )
Generates a button that represents a delete operation.
@ -145,12 +145,22 @@ Any URL parameters that need to be tacked on to the current URL to accomplish wh
The URL to any page. Defaults to the current page.
=head3 confirmText
If defined, a confirm box will popup to ask the user if they want to delete.
=cut
sub deleteIcon {
my ($output, $pageURL);
my ($output, $pageURL, $confirmText);
$confirmText = $_[2];
if($confirmText) {
$confirmText = qq| onclick="return confirm('$confirmText')" |;
}
$pageURL = $_[1] || $session{page}{urlizedTitle};
$output = '<a href="'.WebGUI::URL::gateway($pageURL,$_[0]).'">';
$output = '<a href="'.WebGUI::URL::gateway($pageURL,$_[0]).'" '.$confirmText.'>';
$output .= '<img src="'._getBaseURL().'delete.gif" align="middle" border="0" alt="Delete" title="Delete" /></a>';
return $output;
}