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

refixing session vars

Browse source
This commit is contained in:
Colin Kuskie 2006-03-15 23:57:55 +00:00
parent 4a1e5c0d91
commit 5cf7f98d32
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Asset.pm
View file

@ -103,7 +103,7 @@ Unique hash identifier for a user. If not supplied, current user.
sub canEdit {
my $self = shift;
my $userId = shift || $self->session->user->userId;
my $user = WebGUI::User->new($session, $userId);
my $user = WebGUI::User->new($self->session, $userId);
if ($userId eq $self->get("ownerUserId")) {
return 1;
}
@ -129,7 +129,7 @@ Unique hash identifier for a user. If not specified, uses current userId.
sub canView {
my $self = shift;
my $userId = shift || $self->session->user->userId;
my $user = WebGUI::User->new($session, $userId);
my $user = WebGUI::User->new($self->session, $userId);
return 0 unless ($self->get("state") eq "published");
if ($userId eq $self->get("ownerUserId")) {
return 1;