diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt index 9766bab0c..92212a38e 100644 --- a/docs/changelog/7.x.x.txt +++ b/docs/changelog/7.x.x.txt @@ -8,6 +8,7 @@ - Clicking active version tag in sidebar opens up version tag edit screen - fix: wrong ssl link in iTransact settings - fix thumbnail script with Graphics::Magick + - fix ordering of statuses in In/Out board 7.4.5 - fix: Apostrophy incorrectly escaped as double quote in some places diff --git a/lib/WebGUI/Asset/Wobject/InOutBoard.pm b/lib/WebGUI/Asset/Wobject/InOutBoard.pm index d40684db2..c85cd3ef6 100644 --- a/lib/WebGUI/Asset/Wobject/InOutBoard.pm +++ b/lib/WebGUI/Asset/Wobject/InOutBoard.pm @@ -176,7 +176,8 @@ sub view { my $statusListString = $self->getValue("statusList"); my @statusListArray = split("\n",$statusListString); my $statusListHashRef; - + tie %$statusListHashRef, 'Tie::IxHash'; + foreach my $status (@statusListArray) { chomp($status); next if $status eq "";