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

added commit comments

Browse source
This commit is contained in:
JT Smith 2006-03-16 18:51:49 +00:00
parent 2384bca6ba
commit feda6700e0
7 changed files with 88 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lib/WebGUI/VersionTag.pm
View file

@ -291,6 +291,10 @@ The ID of the workflow that will be triggered when this workflow is committed. D
The ID of the group that's allowed to use this tag. Defaults to the turn admin on group.
=head4 comments
Some text about this version tag, what it's for, why it was committed, why it was denied, why it was approved, etc.
=cut
sub set {
@ -299,6 +303,13 @@ sub set {
$self->{_data}{name} = $properties->{name} || $self->{_data}{name} || "(Autotag) ".$self->session->datetime->epochToHuman()." / ".$self->session->user->username;
$self->{_data}{workflowId} = $properties->{workflowId} || $self->{_data}{workflowId} || $self->session->setting->get("defaultVersionTagWorkflow");
$self->{_data}{groupToUse} = $properties->{groupToUse} || $self->{_data}{groupToUse} || "12";
if (exists $properties->{comments}) {
$self->{_data}{comments}=$self->{_data}{comments}
.$self->session->datetime->epochToHuman.' - '.$self->session->user->username
."\n"
.$properties->{comments}
."\n\n";
}
$self->session->db->setRow("assetVersionTag","tagId",$self->{_data});
}