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

finally, the last of this round of syntax fixes.

Browse source
This commit is contained in:
Matthew Wilson 2006-01-15 21:02:00 +00:00
parent 83e071fde1
commit 128f265678
24 changed files with 194 additions and 164 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib/WebGUI/Auth.pm
View file

@ -619,13 +619,6 @@ sub new {
my $self = {};
my $class = shift;
$self->{_session} = shift;
my $output;
my $i = 1;
while (my @data = caller($i)) {
$output .= "\t".join(",",@data)."\n";
$i++;
}
print $output."\n\n";
$self->{authMethod} = shift;
my $userId = shift || $self->{_session}->user->userId;
$self->{user} = $self->{_session}->user;