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

some bug fixes

Browse source
This commit is contained in:
JT Smith 2005-02-14 20:56:51 +00:00
parent 0b07a0dff1
commit 370a708ab9
6 changed files with 14 additions and 284 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lib/WebGUI/Group.pm
View file

@ -358,9 +358,8 @@ If specified, expireOffset is set to this value.
=cut
sub expireOffset {
my ($class, $value);
$class = shift;
$value = shift;
my $class = shift;
my $value = shift;
if (defined $value) {
$class->{_group}{"expireOffset"} = $value;
WebGUI::SQL->write("update groups set expireOffset=".quote($value).",
@ -383,6 +382,7 @@ The name of the group you wish to instanciate.
=cut
sub find {
my $class = shift;
my $name = shift;
my ($groupId) = WebGUI::SQL->quickArray("select groupId from groups where groupName=".quote($name));
return WebGUI::Group->new($groupId);