version 1.4, 2005/10/14 14:35:43
|
version 1.6, 2005/10/17 19:50:10
|
Line 77 while (<STDIN>) {
|
Line 77 while (<STDIN>) {
|
} |
} |
else { |
else { |
$_ .= "<br />"; |
$_ .= "<br />"; |
|
$_ = &HTML::Entities::encode($_,'<>&"'); |
} |
} |
$description .= $_; |
$description .= $_; |
} |
} |
Line 105 $rss->add_item(
|
Line 106 $rss->add_item(
|
author => $author, |
author => $author, |
description=> $description, |
description=> $description, |
mode => 'insert', |
mode => 'insert', |
link => 'http://install.loncapa.org/cgi-bin/cvsweb.cgi/'.$title[0] |
pubDate => $pubDate, |
|
link => 'http://install.loncapa.org/cgi-bin/cvsweb.cgi/'.$title[0].'.diff?r1='.$title[1].';r2='.$title[2].';f=h' |
); |
); |
|
|
foreach my $element (@{$rss->{'items'}}) { |
foreach my $element (@{$rss->{'items'}}) { |