]> git.vanrenterghem.biz Git - git.ikiwiki.info.git/commitdiff
store ctime for use by expiry code
authorJoey Hess <joey@kodama.kitenet.net>
Wed, 17 Sep 2008 22:09:38 +0000 (18:09 -0400)
committerJoey Hess <joey@kodama.kitenet.net>
Wed, 17 Sep 2008 22:11:22 +0000 (18:11 -0400)
The expiry code does need to make sure to sort in ctime order, even if
expiring by count, so it expires the right ones.

IkiWiki/Plugin/aggregate.pm
debian/changelog

index c1421f24612863014a5a8f53ecb3c4bb1aab708f..f47dc58b3f67e598843ace5d1d429e71c2e76ae8 100644 (file)
@@ -420,10 +420,10 @@ sub expire () { #{{{
                next unless $feed->{expireage} || $feed->{expirecount};
                my $count=0;
                my %seen;
-               foreach my $item (sort { ($IkiWiki::pagectime{$b->{page}}||0) <=> ($IkiWiki::pagectime{$a->{page}}||0) }
+               foreach my $item (sort { $IkiWiki::pagectime{$b->{page}} <=> $IkiWiki::pagectime{$a->{page}} }
                                  grep { exists $_->{page} && $_->{feed} eq $feed->{name} }
                                  values %guids) {
-                       if ($feed->{expireage} && $IkiWiki::pagectime{$_->{page}}) {
+                       if ($feed->{expireage}) {
                                my $days_old = (time - $IkiWiki::pagectime{$item->{page}}) / 60 / 60 / 24;
                                if ($days_old > $feed->{expireage}) {
                                        debug(sprintf(gettext("expiring %s (%s days old)"),
@@ -618,10 +618,13 @@ sub add_page (@) { #{{{
        writefile(htmlfn($guid->{page}), $config{srcdir},
                $template->output);
 
-       # Set the mtime, this lets the build process get the right creation
-       # time on record for the new page.
-       utime $mtime, $mtime, pagefile($guid->{page})
-               if defined $mtime && $mtime <= time;
+       if (defined $mtime && $mtime <= time) {
+               # Set the mtime, this lets the build process get the right
+               # creation time on record for the new page.
+               utime $mtime, $mtime, pagefile($guid->{page});
+               # Store it in pagectime for expiry code to use also.
+               $IkiWiki::pagectime{$guid->{page}}=$mtime;
+       }
 } #}}}
 
 sub htmlescape ($) { #{{{
index 5ad864c13e7b3c082f5ab1b64a788f8b57c6b075..bf44d98511b00bdb3805a924bfe8ea25a6c8e88b 100644 (file)
@@ -1,7 +1,7 @@
 ikiwiki (2.65) UNRELEASED; urgency=low
 
-  * aggregate: Allow expirecount to work on the first pass. (expireage still
-    needs to wait for the pages to be rendered though)
+  * aggregate: Expire excess or old items on the same pass that adds them,
+    not only on subsequent passes.
   * editdiff: Broken since 2.62 due to wrong syntax, now fixed.
   * aggregate: Support atom feeds with only a summary element, and no content
     elements.