Photos
Blog
Projects
vanrenterghem.biz
projects
/
git.ikiwiki.info.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
comments: add regression test for sorting by date
[git.ikiwiki.info.git]
/
IkiWiki
/
Plugin
/
pinger.pm
diff --git
a/IkiWiki/Plugin/pinger.pm
b/IkiWiki/Plugin/pinger.pm
index 4a808866164d7e2f1e6e185b97b37e50cf0c307b..ea4f3e0dc563bac69a999ed42b4884f48b1892a7 100644
(file)
--- a/
IkiWiki/Plugin/pinger.pm
+++ b/
IkiWiki/Plugin/pinger.pm
@@
-45,6
+45,7
@@
sub needsbuild (@) {
}
}
}
}
}
}
+ return $needsbuild;
}
sub preprocess (@) {
}
sub preprocess (@) {
@@
-66,6
+67,8
@@
sub ping {
if (! $pinged && %pages) {
$pinged=1;
if (! $pinged && %pages) {
$pinged=1;
+ eval q{use Net::INET6Glue::INET_is_INET6}; # may not be available
+
my $ua;
eval q{use LWPx::ParanoidAgent};
if (!$@) {
my $ua;
eval q{use LWPx::ParanoidAgent};
if (!$@) {
@@
-105,8
+108,10
@@
sub ping {
# only ping when a page was changed, so a ping loop
# will still be avoided.
next if $url=~/^\Q$config{cgiurl}\E/;
# only ping when a page was changed, so a ping loop
# will still be avoided.
next if $url=~/^\Q$config{cgiurl}\E/;
+ my $local_cgiurl = IkiWiki::cgiurl();
+ next if $url=~/^\Q$local_cgiurl\E/;
- $ua->
head
($url);
+ $ua->
get
($url);
}
exit 0;
}
exit 0;