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

default new revisions to approved

Browse source
This commit is contained in:
Doug Bell 2010-11-10 12:36:32 -06:00
parent 0fd78da778
commit ab18af37ef
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/WebGUI/AssetVersioning.pm
View file

@ -95,7 +95,8 @@ sub addRevision {
my %mergedProperties = (%{$self->get}, %{$properties}, ); my %mergedProperties = (%{$self->get}, %{$properties}, );
# Set some defaults # Set some defaults
$mergedProperties{ revisedBy } ||= $session->user->userId; $mergedProperties{ revisedBy } ||= $session->user->userId;
$mergedProperties{ status } ||= "approved";
#Instantiate new revision and fill with real data #Instantiate new revision and fill with real data
my $newVersion = WebGUI::Asset->newById($session, $self->getId, $now); my $newVersion = WebGUI::Asset->newById($session, $self->getId, $now);