version 1.35, 2007/05/02 01:33:49
|
version 1.36, 2007/05/21 23:15:11
|
Line 466 sub handler {
|
Line 466 sub handler {
|
} |
} |
# Get feed items |
# Get feed items |
my %newsfeed=&Apache::lonnet::dump($feedname,$udom,$uname); |
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 |
if ($entry=~/^(\d+)\_status$/) { # is an entry |
my $id=$1; |
my $id=$1; |
if ($edit) { |
if ($edit) { |