[otrs-cvs] FAQ/Kernel/Output/HTML LinkObjectFAQ.pm, 1.14, 1.15 LayoutFAQ.pm, 1.56, 1.57

Comments:
Update of /home/cvs/FAQ/Kernel/Output/HTML
In directory lancelot:/tmp/cvs-serv2129/Kernel/Output/HTML

Modified Files:
	LinkObjectFAQ.pm LayoutFAQ.pm 
Log Message:
Code cleanup.

Author: cr

Index: LinkObjectFAQ.pm
===================================================================
RCS file: /home/cvs/FAQ/Kernel/Output/HTML/LinkObjectFAQ.pm,v
retrieving revision 1.14
retrieving revision 1.15
diff -2 -u -d -r1.14 -r1.15
--- LinkObjectFAQ.pm	20 Nov 2012 13:06:56 -0000	1.14
+++ LinkObjectFAQ.pm	6 Dec 2012 21:34:28 -0000	1.15
@@ -164,15 +164,15 @@
     # convert the list
     my %LinkList;
-    for my $LinkType ( keys %{ $Param{ObjectLinkListWithData} } ) {
+    for my $LinkType ( sort keys %{ $Param{ObjectLinkListWithData} } ) {
 
         # extract link type List
         my $LinkTypeList = $Param{ObjectLinkListWithData}->{$LinkType};
 
-        for my $Direction ( keys %{$LinkTypeList} ) {
+        for my $Direction ( sort keys %{$LinkTypeList} ) {
 
             # extract direction list
             my $DirectionList = $Param{ObjectLinkListWithData}->{$LinkType}->{$Direction};
 
-            for my $FAQID ( keys %{$DirectionList} ) {
+            for my $FAQID ( sort keys %{$DirectionList} ) {
 
                 $LinkList{$FAQID}->{Data} = $DirectionList->{$FAQID};
@@ -296,10 +296,10 @@
     my $FAQHook = $Self->{ConfigObject}->Get('FAQ::FAQHook');
     my %LinkOutputData;
-    for my $LinkType ( keys %{ $Param{ObjectLinkListWithData} } ) {
+    for my $LinkType ( sort keys %{ $Param{ObjectLinkListWithData} } ) {
 
         # extract link type List
         my $LinkTypeList = $Param{ObjectLinkListWithData}->{$LinkType};
 
-        for my $Direction ( keys %{$LinkTypeList} ) {
+        for my $Direction ( sort keys %{$LinkTypeList} ) {
 
             # extract direction list

Author: cr

Index: LayoutFAQ.pm
===================================================================
RCS file: /home/cvs/FAQ/Kernel/Output/HTML/LayoutFAQ.pm,v
retrieving revision 1.56
retrieving revision 1.57
diff -2 -u -d -r1.56 -r1.57
--- LayoutFAQ.pm	20 Nov 2012 13:06:56 -0000	1.56
+++ LayoutFAQ.pm	6 Dec 2012 21:34:28 -0000	1.57
@@ -230,5 +230,5 @@
 
     # loop over configured backends
-    for my $Backend ( keys %{$Backends} ) {
+    for my $Backend ( sort keys %{$Backends} ) {
 
         # build navbar view mode
---------------------------------------------------------------------
OTRS mailing list: cvs-log - Webpage: http://otrs.org/
Archive: http://lists.otrs.org/pipermail/cvs-log
To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/cvs-log