X-Git-Url: http://www.privoxy.org/gitweb/?p=privoxy.git;a=blobdiff_plain;f=utils%2Fcreate-package-feed.pl;h=aff89ed3e9b55f0cac97030b2eb1fefc3aa235cb;hp=6e875889a01b4b1facdfab0d3edb922da7cb5b56;hb=88647d49d4fe80ff540e6d91bd61adb4b95d0654;hpb=a1b1345ba24a9fb188e31a3b712bf28752b420be
diff --git a/utils/create-package-feed.pl b/utils/create-package-feed.pl
index 6e875889..aff89ed3 100644
--- a/utils/create-package-feed.pl
+++ b/utils/create-package-feed.pl
@@ -66,6 +66,8 @@ while (my $fi1 = readdir($D1)) {
# URI and Time
$target_uri = $fi1 . '/' . $fi2 . '/' . $fi3;
+ my $escaped_target_uri = $target_uri;
+ $escaped_target_uri =~ s@ @%20@g;
$target_time = (stat $target)[9];
# RSS line
@@ -80,19 +82,19 @@ while (my $fi1 = readdir($D1)) {
$target_line .=
''
. $base_dlurl
- . $target_uri
+ . $escaped_target_uri
. ''
. $base_dlurl
- . $target_uri
+ . $escaped_target_uri
. '';
$target_line .= '';
($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) =
gmtime($target_time);
- $target_line .=
- "$days[$wday], $mday $months[$mon] "
- . ($year + 1900)
- . " $hour:$min:$sec GMT";
+ $target_line .= sprintf("%s, %s %s %d %.2d:%.2d:%.2d GMT",
+ $days[$wday], $mday, $months[$mon], ($year + 1900),
+ $hour, $min, $sec);
$target_line .= '';
+ $target_line .= "\n";
# Add it to Array
$Array[$i] = ([$target_time, $target_line]);
@@ -110,13 +112,20 @@ closedir($D1);
# Result = Full XML Codes
my $result =
- 'Privoxy Releaseshttps://www.privoxy.org/announce.txt';
+ '
+
+
+ Privoxy Releases
+ https://www.privoxy.org/announce.txt
+
+ ';
($sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst) = gmtime();
$result .=
"$days[$wday], $mday $months[$mon] "
. ($year + 1900)
. " $hour:$min:$sec GMT";
$result .= '';
+$result .= "\n";
# Sort Array
my @resArray = sort { @$a[0] <=> @$b[0] } @Array;
@@ -125,7 +134,8 @@ while ($max_advertised_files-- > 0 && $i >= 0) {
$result .= $resArray[$i][1];
$i--;
}
-$result .= '';
+$result .= '
+ ';
# Save it.
open(my $XMLF, ">", $save_rss_file) or die "Failed to write XML file";