Multiple enhancements:

- Perform RFE "js-confirmation-operation/user.pm".
  - Perform RFE "js-confirmation-operation/group.pm".
  - Perform RFE "locked-by-who".
    (Displays in title and alt of img, but not in body text.)
This commit is contained in:
Drake 2006-08-29 16:49:25 +00:00
parent 936054ba19
commit aac32d24bd
6 changed files with 58 additions and 49 deletions

View file

@ -145,6 +145,22 @@ sub isLocked {
}
#-------------------------------------------------------------------
=head2 lockedBy ( )
Returns the user who locked this asset, or undef if the asset is unlocked.
=cut
sub lockedBy {
my $self = shift;
my $userId = $self->get("isLockedBy");
return unless defined $userId;
return WebGUI::User->new($self->session, $userId);
}
#-------------------------------------------------------------------
=head2 purgeRevision ( )