doc/todo/Set_arbitrary_date_to_be_used_by_calendar_plugin.mdwn

   1 [[tag patch]]
   2
   3 Here's a patch to the calendar plugin. If you specify an event preprocessor in a post, such as:
   4
   5     [[event time="2008-06-24"]]
   6
   7 That date will be used instead of the post creation time when displaying the calendar.
   8
   9 > Thanks for coming up with a patch.. Let me make sure I understand its
  10 > rationalle.
  11 >
  12 > The meta plugin already allows modifying the page creation time,
  13 > which is what the calendar plugin uses.
  14 >
  15 > So, it seems to me that the use of this patch is for recording events in
  16 > the future. You'd not want a page for a future event to claim it was
  17 > created in the future. I suppose you could also use it for events in the
  18 > past, if you didn't want to change the creation time for some reason.
  19 > (Perhaps you're doing a calendar of historical events, for example.)
  20 >
  21 > Accurate? --[[Joey]]
  22
  23 >> Thanks for the feedback. Thinking about what you said ... I suspect my patch
  24 >> doesn't belong in the calendar plugin, which does a very specific thing
  25 >> (create a calendar to show when blog posts were created). I'm really angling
  26 >> toward an event calendar (as mentioned on [[todo/plugin]]). I'd like to preserve
  27 >> the page creation time - which is useful and important information in its own right
  28 >> - and be able to generate a calendar with links to particular posts that will show
  29 >> up on the calendar based on an arbitrary date. Perhaps this should be re-considered
  30 >> as a separate plugin?
  31
  32 >>> I think it makes sense to have only one calendar, if possible.
  33 >>> I think your event stuff is fine, the only thing we might want to add
  34 >>> is a config option for the calendar, to control whether it looks at the
  35 >>> event date, or the creation date. --[[Joey]]
  36
  37     --- calendar.pm.orig  2008-06-24 22:36:09.000000000 -0400
  38     +++ calendar.pm 2008-06-24 22:51:11.000000000 -0400
  39     @@ -23,6 +23,7 @@
  40      use IkiWiki 2.00;
  41      use Time::Local;
  42      use POSIX;
  43     +use Date::Parse;
  44
  45      my %cache;
  46      my %linkcache;
  47     @@ -32,6 +33,7 @@
  48      sub import { #{{{
  49       hook(type => "needsbuild", id => "version", call => \&needsbuild);
  50       hook(type => "preprocess", id => "calendar", call => \&preprocess);
  51     + hook(type => "preprocess", id => "event", call => \&preprocess_event);
  52      } #}}}
  53
  54      sub is_leap_year (@) { #{{{
  55     @@ -304,6 +306,19 @@
  56       return $calendar;
  57      } #}}}
  58
  59     +sub preprocess_event (@) { #{{{
  60     + my %params=@_;
  61     + # if now time is given, use now
  62     + $params{time} = localtime            unless defined $params{time};
  63     +
  64     + my $timestamp = str2time($params{time});
  65     + if ( defined $timestamp) {
  66     +   $pagestate{$params{page}}{event}{mtime}=$timestamp;
  67     + }
  68     + # remove the event block entirely
  69     + return "";
  70     +} #}}
  71     +
  72      sub preprocess (@) { #{{{
  73       my %params=@_;
  74       $params{pages} = "*"            unless defined $params{pages};
  75     @@ -355,7 +370,13 @@
  76       if (! defined $cache{$pagespec}) {
  77         foreach my $p (keys %pagesources) {
  78           next unless pagespec_match($p, $pagespec);
  79     -     my $mtime = $IkiWiki::pagectime{$p};
  80     +     my $mtime;
  81     +     # use time defined by event preprocessor if it's available
  82     +     if (defined $pagestate{$p}{event}{mtime}) {
  83     +       $mtime = $pagestate{$p}{event}{mtime};
  84     +     } else {
  85     +       $mtime = $IkiWiki::pagectime{$p};
  86     +     }
  87           my $src   = $pagesources{$p};
  88           my @date  = localtime($mtime);
  89           my $mday  = $date[3];