--- loncom/interface/lonrss.pm 2007/01/18 19:02:00 1.33
+++ loncom/interface/lonrss.pm 2007/05/21 23:15:11 1.36
@@ -1,7 +1,7 @@
# The LearningOnline Network
# RSS Feeder
#
-# $Id: lonrss.pm,v 1.33 2007/01/18 19:02:00 www Exp $
+# $Id: lonrss.pm,v 1.36 2007/05/21 23:15:11 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -104,7 +104,7 @@ sub advertisefeeds {
} else {
$feeds.='
'.$feednames{$feed}.
'
'.($edit?&mt('Edit'):'HTML').': '.$htmlurl.''.
- '
RSS: '.$feedurl.'';
+ '
'.&mt('Public RSS/podcast (subscribe to)').': '.$feedurl.'';
}
}
}
@@ -466,7 +466,7 @@ sub handler {
}
# 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) {
@@ -474,7 +474,7 @@ sub handler {
'private' => 'private',
'hidden' => 'hidden',
'delete' => 'delete',
- 'store' => 'Store changes',
+ 'store' => 'Save changes',
'title' => 'Title',
'link' => 'Link',
'description' => 'Description',
@@ -554,7 +554,7 @@ ENDEDIT
if ($html) {
$r->print('');
if ($edit) {
- $r->print(''.
+ $r->print(''.
($displayoption eq 'hidden'?'':
''));
}