X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/745dc1c62f46bacda60d01283145b5baa0adfea1..d0b34951240317642543351ec62f98d3d8df8c0f:/IkiWiki/Plugin/relativedate.pm diff --git a/IkiWiki/Plugin/relativedate.pm b/IkiWiki/Plugin/relativedate.pm index 2895f6d57..4ae0be861 100644 --- a/IkiWiki/Plugin/relativedate.pm +++ b/IkiWiki/Plugin/relativedate.pm @@ -2,41 +2,70 @@ package IkiWiki::Plugin::relativedate; use warnings; +no warnings 'redefine'; use strict; -use IkiWiki 2.00; +use IkiWiki 3.00; +use POSIX (); +use Encode; -sub import { #{{{ +sub import { add_underlay("javascript"); hook(type => "getsetup", id => "relativedate", call => \&getsetup); hook(type => "format", id => "relativedate", call => \&format); -} # }}} + inject(name => "IkiWiki::displaytime", call => \&mydisplaytime); +} -sub getsetup () { #{{{ +sub getsetup () { return plugin => { safe => 1, rebuild => 1, }, -} #}}} +} -sub format (@) { #{{{ +sub format (@) { my %params=@_; - if (! ($params{content}=~s!^()!$1.include_javascript($params{page})!em)) { - # no tag, probably in preview mode - $params{content}=include_javascript($params{page}, 1).$params{content}; + if (! ($params{content}=~s!^(]*>)!$1.include_javascript($params{page})!em)) { + # no tag, probably in preview mode + $params{content}=include_javascript(undef).$params{content}; } return $params{content}; -} # }}} +} -sub include_javascript ($;$) { #{{{ - my $page=shift; - my $absolute=shift; +sub include_javascript ($) { + my $from=shift; - return ''."\n". - ''; -} #}}} +} + +sub mydisplaytime ($;$$) { + my $time=shift; + my $format=shift; + my $pubdate=shift; + + # This needs to be in a form that can be parsed by javascript. + # (Being fairly human readable is also nice, as it will be exposed + # as the title if javascript is not available.) + my $lc_time=POSIX::setlocale(&POSIX::LC_TIME); + POSIX::setlocale(&POSIX::LC_TIME, "C"); + my $gmtime=decode_utf8(POSIX::strftime("%a, %d %b %Y %H:%M:%S %z", + localtime($time))); + POSIX::setlocale(&POSIX::LC_TIME, $lc_time); + + my $mid=' class="relativedate" title="'.$gmtime.'">'. + IkiWiki::formattime($time, $format); + + if ($config{html5}) { + return ''; + } + else { + return ''; + } +} 1