"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "scripts/test/ProcessManagement/DB/TransitionAction.t" between
otrs-5.0.39.tar.bz2 and otrs-5.0.40.tar.bz2

About: OTRS (formerly "Open Ticket Request System" now "Open Technology – Real Service") is a web-based ticketing systems used for Customer Service, Help Desk, IT Service Management. 5.x release ("Community Edition").

TransitionAction.t  (otrs-5.0.39.tar.bz2):TransitionAction.t  (otrs-5.0.40.tar.bz2)
skipping to change at line 762 skipping to change at line 762
for my $TransitionActionID ( sort keys %{$OriginalTransitionActionList} ) { for my $TransitionActionID ( sort keys %{$OriginalTransitionActionList} ) {
delete $TestTransitionActionListCopy{$TransitionActionID}; delete $TestTransitionActionListCopy{$TransitionActionID};
} }
$Self->Is( $Self->Is(
scalar keys %TestTransitionActionListCopy, scalar keys %TestTransitionActionListCopy,
scalar @AddedTransitionActionsList, scalar @AddedTransitionActionsList,
"TransitionActionList Test 2: All TransitionAction | Number of TransitionAct ions match added TransitionActions", "TransitionActionList Test 2: All TransitionAction | Number of TransitionAct ions match added TransitionActions",
); );
my $Counter = 0; my $Counter = 0;
for my $TransitionActionID ( sort { $a <=> $b } keys %TestTransitionActionListCo my @AddedTransitionActionsListSort = sort { int $a <=> int $b } @AddedTransition
py ) { ActionsList;
for my $TransitionActionID ( sort { int $a <=> int $b } keys %TestTransitionActi
onListCopy ) {
$Self->Is( $Self->Is(
$TransitionActionID, $TransitionActionID,
$AddedTransitionActionsList[$Counter], $AddedTransitionActionsListSort[$Counter],
"TransitionActionList Test 2: All | TransitionActionID match AddedTransi tionActionID", "TransitionActionList Test 2: All | TransitionActionID match AddedTransi tionActionID",
); );
$Counter++; $Counter++;
} }
# #
# TransitionActionDelete() (test for fail, test for success are done by removing TransitionActions # TransitionActionDelete() (test for fail, test for success are done by removing TransitionActions
# at the end) # at the end)
# #
@Tests = ( @Tests = (
skipping to change at line 851 skipping to change at line 852
UserID => $UserID, UserID => $UserID,
); );
# get simple list of TransitionActions # get simple list of TransitionActions
my $List = $TransitionActionObject->TransitionActionList( my $List = $TransitionActionObject->TransitionActionList(
UserID => $UserID, UserID => $UserID,
); );
# create the list of TransitionActions with details manually # create the list of TransitionActions with details manually
my $ExpectedTransitionActionList; my $ExpectedTransitionActionList;
for my $TransitionActionID ( sort { $a <=> $b } keys %{$List} ) { for my $TransitionActionID ( sort { int $a <=> int $b } keys %{$List} ) {
my $TransitionActionData = $TransitionActionObject->TransitionActionGet( my $TransitionActionData = $TransitionActionObject->TransitionActionGet(
ID => $TransitionActionID, ID => $TransitionActionID,
UserID => $UserID, UserID => $UserID,
); );
push @{$ExpectedTransitionActionList}, $TransitionActionData; push @{$ExpectedTransitionActionList}, $TransitionActionData;
} }
$Self->Is( $Self->Is(
ref $FullList, ref $FullList,
 End of changes. 3 change blocks. 
5 lines changed or deleted 7 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)