diff --git a/lib/WebGUI/Operation/Invite.pm b/lib/WebGUI/Operation/Invite.pm index f72ca5d8f..7dc12f68a 100644 --- a/lib/WebGUI/Operation/Invite.pm +++ b/lib/WebGUI/Operation/Invite.pm @@ -102,7 +102,6 @@ sub www_inviteUserSave { #User existance check. my $existingUser = WebGUI::User->newByEmail($session, $hisEmailAddress); - use Data::Dumper; if (defined $existingUser) { my $output = sprintf qq!
%s
%s!, $i18n->get('already a member'), diff --git a/lib/WebGUI/Storage.pm b/lib/WebGUI/Storage.pm index 376abd516..f83f549b5 100644 --- a/lib/WebGUI/Storage.pm +++ b/lib/WebGUI/Storage.pm @@ -457,14 +457,15 @@ Deletes a file from it's storage location. =head3 filename -The name of the file to delete. +The name of the file to delete. Returns a 1 if the file was successfully deleted, or 0 if +it doesn't. =cut sub deleteFile { - my $self = shift; - my $filename = shift; - unlink($self->getPath($filename)); + my $self = shift; + my $filename = shift; + unlink($self->getPath($filename)); }