diff --git a/lib/WebGUI/AssetVersioning.pm b/lib/WebGUI/AssetVersioning.pm index ebf1784e2..675b2d490 100644 --- a/lib/WebGUI/AssetVersioning.pm +++ b/lib/WebGUI/AssetVersioning.pm @@ -95,7 +95,8 @@ sub addRevision { my %mergedProperties = (%{$self->get}, %{$properties}, ); # Set some defaults - $mergedProperties{ revisedBy } ||= $session->user->userId; + $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);