diff options
-rw-r--r-- | IkiWiki/Plugin/osm.pm | 35 | ||||
-rw-r--r-- | IkiWiki/Plugin/trail.pm | 85 |
2 files changed, 31 insertions, 89 deletions
diff --git a/IkiWiki/Plugin/osm.pm b/IkiWiki/Plugin/osm.pm index 8bf6ae93b..c9c5646c4 100644 --- a/IkiWiki/Plugin/osm.pm +++ b/IkiWiki/Plugin/osm.pm @@ -325,41 +325,6 @@ sub writekml($;$) { eval q{use XML::Writer}; error $@ if $@; foreach my $map (keys %waypoints) { - -=pod -Sample placemark: - -<?xml version="1.0" encoding="UTF-8"?> -<kml xmlns="http://www.opengis.net/kml/2.2"> - <Placemark> - <name>Simple placemark</name> - <description>Attached to the ground. Intelligently places itself - at the height of the underlying terrain.</description> - <Point> - <coordinates>-122.0822035425683,37.42228990140251,0</coordinates> - </Point> - </Placemark> -</kml> - -Sample style: - - - <Style id="sh_sunny_copy69"> - <IconStyle> - <scale>1.4</scale> - <Icon> - <href>http://waypoints.google.com/mapfiles/kml/shapes/sunny.png</href> - </Icon> - <hotSpot x="0.5" y="0.5" xunits="fraction" yunits="fraction"/> - </IconStyle> - <LabelStyle> - <color>ff00aaff</color> - </LabelStyle> - </Style> - - -=cut - my $output; my $writer = XML::Writer->new( OUTPUT => \$output, DATA_MODE => 1, ENCODING => 'UTF-8'); diff --git a/IkiWiki/Plugin/trail.pm b/IkiWiki/Plugin/trail.pm index 29830175e..330d2a31d 100644 --- a/IkiWiki/Plugin/trail.pm +++ b/IkiWiki/Plugin/trail.pm @@ -20,60 +20,37 @@ sub import { hook(type => "build_affected", id => "trail", call => \&build_affected); } -=head1 Page state - -If a page C<$T> is a trail, then it can have - -=over - -=item * C<$pagestate{$T}{trail}{contents}> - -Reference to an array of lists each containing either: - -=over - -=item * C<[link, "link"]> - -A link specification, pointing to the same page that C<[[link]]> would select - -=item * C<[pagespec, "posts/*", "age", 0]> - -A match by pagespec; the third array element is the sort order and the fourth -is whether to reverse sorting - -=back - -=item * C<$pagestate{$T}{trail}{sort}> - -A [[ikiwiki/pagespec/sorting]] order; if absent or undef, the trail is in -the order given by the links that form it - -=item * C<$pagestate{$T}{trail}{circular}> - -True if this trail is circular (i.e. going "next" from the last item is -allowed, and takes you back to the first) - -=item * C<$pagestate{$T}{trail}{reverse}> - -True if C<sort> is to be reversed. - -=back - -If a page C<$M> is a member of a trail C<$T>, then it has - -=over - -=item * C<$pagestate{$M}{trail}{item}{$T}[0]> - -The page before this one in C<$T> at the last rebuild, or undef. - -=item * C<$pagestate{$M}{trail}{item}{$T}[1]> - -The page after this one in C<$T> at the last refresh, or undef. - -=back - -=cut +# Page state +# +# If a page $T is a trail, then it can have +# +# * $pagestate{$T}{trail}{contents} +# Reference to an array of lists each containing either: +# - [link, "link"] +# A link specification, pointing to the same page that [[link]] +# would select +# - [pagespec, "posts/*", "age", 0] +# A match by pagespec; the third array element is the sort order +# and the fourth is whether to reverse sorting +# +# * $pagestate{$T}{trail}{sort} +# A sorting order; if absent or undef, the trail is in the order given +# by the links that form it +# +# * $pagestate{$T}{trail}{circular} +# True if this trail is circular (i.e. going "next" from the last item is +# allowed, and takes you back to the first) +# +# * $pagestate{$T}{trail}{reverse} +# True if C<sort> is to be reversed. +# +# If a page $M is a member of a trail $T, then it has +# +# * $pagestate{$M}{trail}{item}{$T}[0] +# The page before this one in C<$T> at the last rebuild, or undef. +# +# * $pagestate{$M}{trail}{item}{$T}[1] +# The page after this one in C<$T> at the last refresh, or undef. sub getsetup () { return |