[LON-CAPA-cvs] cvs: loncom /interface lonrss.pm

albertel lon-capa-cvs-allow@mail.lon-capa.org
Mon, 21 May 2007 23:15:13 -0000


albertel		Mon May 21 19:15:13 2007 EDT

  Modified files:              
    /loncom/interface	lonrss.pm 
  Log:
  - blog items should show in reverse chronological order
  
  
Index: loncom/interface/lonrss.pm
diff -u loncom/interface/lonrss.pm:1.35 loncom/interface/lonrss.pm:1.36
--- loncom/interface/lonrss.pm:1.35	Tue May  1 21:33:49 2007
+++ loncom/interface/lonrss.pm	Mon May 21 19:15:11 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # RSS Feeder
 #
-# $Id: lonrss.pm,v 1.35 2007/05/02 01:33:49 albertel Exp $
+# $Id: lonrss.pm,v 1.36 2007/05/21 23:15:11 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -466,7 +466,7 @@
             }
 # Get feed items
 	    my %newsfeed=&Apache::lonnet::dump($feedname,$udom,$uname);
-	    foreach my $entry (sort(keys(%newsfeed)),$newid.'_status') {
+	    foreach my $entry (sort {$b cmp $a} (keys(%newsfeed)),$newid.'_status') {
 		if ($entry=~/^(\d+)\_status$/) { # is an entry
 		    my $id=$1;
 		    if ($edit) {