version 1.10, 2006/03/16 19:56:21
|
version 1.13, 2006/03/23 22:32:11
|
Line 97 sub advertisefeeds {
|
Line 97 sub advertisefeeds {
|
} |
} |
} |
} |
|
|
|
sub rss_link { |
|
my ($url) = @_; |
|
return qq|<link rel="alternate" type="application/rss+xml" title="Course Announcements" href="$url" />|; |
|
|
|
} |
|
|
{ |
{ |
my $feedcounter; |
my $feedcounter; |
sub addentry { |
sub addentry { |
Line 145 sub changed_js {
|
Line 151 sub changed_js {
|
tform.elements[id+"_modified"].checked=true; |
tform.elements[id+"_modified"].checked=true; |
} |
} |
</script> |
</script> |
ENDSCRIPT |
ENDSCRIPT |
} |
} |
|
|
sub handler { |
sub handler { |
Line 175 sub handler {
|
Line 181 sub handler {
|
my $feedname=&feedname($filename); |
my $feedname=&feedname($filename); |
my $displayfeedname=&displayfeedname($filename,$uname,$udom); |
my $displayfeedname=&displayfeedname($filename,$uname,$udom); |
if ($html) { |
if ($html) { |
$r->print(&Apache::lonxml::xmlbegin(). |
$r->print(&Apache::loncommon::start_page($displayfeedname,undef, |
&Apache::loncommon::head($displayfeedname). |
{'domain' => $udom, |
&Apache::loncommon::bodytag($displayfeedname,'','','',$udom, |
'force_register' => |
$env{'form.register'}). |
$env{'form.register'}}). |
&changed_js()); |
&changed_js()); |
|
|
} else { |
} else { |