Rearranged the autotag name creation to be easier to read.

This commit is contained in:
JT Smith 2006-10-02 17:29:00 +00:00
parent f5aaa2e996
commit 51280b0b38
2 changed files with 3 additions and 1 deletions

View file

@ -394,7 +394,7 @@ Some text about this version tag, what it's for, why it was committed, why it wa
sub set {
my $self = shift;
my $properties = shift;
$self->{_data}{name} = $properties->{name} || $self->{_data}{name} || "(Autotag) ".$self->session->datetime->epochToHuman()." / ".$self->session->user->username;
$self->{_data}{name} = $properties->{name} || $self->{_data}{name} || $self->session->user->username." / ".$self->session->datetime->epochToHuman()." (Autotag)";
$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}) {