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

almost done fixing addRevision changes

Browse source
This commit is contained in:
Doug Bell 2010-11-16 11:18:41 -06:00
parent 3ce9198220
commit 1866c593ea
25 changed files with 186 additions and 199 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/WebGUI/AssetVersioning.pm
View file

@ -96,7 +96,6 @@ sub addRevision {
# Set some defaults
$mergedProperties{ revisedBy } ||= $session->user->userId;
$mergedProperties{ status } ||= "approved";
#Instantiate new revision and fill with real data
my $newVersion = WebGUI::Asset->newById($session, $self->getId, $now);
@ -550,7 +549,9 @@ This is the same as doing an www_editSave without changing anything. It's here s
sub www_lock {
my $self = shift;
if (!$self->isLocked && $self->canEdit) {
$self = $self->addRevision;
my $tag = WebGUI::VersionTag->getWorking( $self->session );
$self = $self->addRevision({ tagId => $tag->getId, status => "pending" });
$self->setVersionLock;
}
if ($self->session->form->process("proceed") eq "manageAssets") {
$self->session->asset($self->getParent);