equal
deleted
inserted
replaced
386 sub rss_en ($data) { |
386 sub rss_en ($data) { |
387 my $thing = <<"END" =~ s/\n\s+//gr; |
387 my $thing = <<"END" =~ s/\n\s+//gr; |
388 <item> |
388 <item> |
389 <title>TITLE</title> |
389 <title>TITLE</title> |
390 <link>LINK</link> |
390 <link>LINK</link> |
391 <description>DESC</description> |
|
392 </item> |
391 </item> |
393 END |
392 END |
394 $thing |
393 $thing |
395 =~ s|LINK|"$domain/" . $data->{file}|er |
394 =~ s|LINK|"$domain/" . $data->{file}|er |
396 =~ s/TITLE/$data->{utitle}/er; |
395 =~ s/TITLE/$data->{utitle}/er; |