X-Git-Url: https://sipb.mit.edu/gitweb.cgi/ikiwiki.git/blobdiff_plain/31d0021e9cc1c69b094c13096df0ec925e50654c..122636308f908e877342a9ec2b361eaba2e9b637:/IkiWiki/Plugin/inline.pm

diff --git a/IkiWiki/Plugin/inline.pm b/IkiWiki/Plugin/inline.pm
index 70b353ec5..ebfcee9ed 100644
--- a/IkiWiki/Plugin/inline.pm
+++ b/IkiWiki/Plugin/inline.pm
@@ -5,7 +5,6 @@ package IkiWiki::Plugin::inline;
 use warnings;
 use strict;
 use IkiWiki 1.00;
-use IkiWiki::Render; # for displaytime
 use URI;
 
 sub import { #{{{
@@ -34,7 +33,7 @@ sub getopt () { #{{{
 
 sub checkconfig () { #{{{
 	if (($config{rss} || $config{atom}) && ! length $config{url}) {
-		error("Must specify url to wiki with --url when using --rss or --atom");
+		error(gettext("Must specify url to wiki with --url when using --rss or --atom"));
 	}
 	if ($config{rss}) {
 		push @{$config{wiki_file_prune_regexps}}, qr/\.rss$/;
@@ -82,7 +81,7 @@ sub preprocess_inline (@) { #{{{
 	my @list;
 	foreach my $page (keys %pagesources) {
 		next if $page eq $params{page};
-		if (pagespec_match($page, $params{pages})) {
+		if (pagespec_match($page, $params{pages}, $params{page})) {
 			push @list, $page;
 		}
 	}
@@ -94,7 +93,11 @@ sub preprocess_inline (@) { #{{{
 		@list=sort { $pagectime{$b} <=> $pagectime{$a} } @list;
 	}
 	else {
-		return "unknown sort type $params{sort}";
+		return sprintf(gettext("unknown sort type %s"), $params{sort});
+	}
+
+	if (yesno($params{reverse})) {
+		@list=reverse(@list);
 	}
 
 	if (exists $params{skip}) {
@@ -158,8 +161,18 @@ sub preprocess_inline (@) { #{{{
 				my $file = $pagesources{$page};
 				my $type = pagetype($file);
 				if ($config{discussion}) {
-					$template->param(have_actions => 1);
-					$template->param(discussionlink => htmllink($page, $params{page}, "Discussion", 1, 1));
+					my $discussionlink=gettext("discussion");
+					if ($page !~ /.*\/\Q$discussionlink\E$/ &&
+					    (length $config{cgiurl} ||
+					     exists $links{$page."/".$discussionlink})) {
+						$template->param(have_actions => 1);
+						$template->param(discussionlink =>
+							htmllink($page,
+								$params{page},
+								gettext("Discussion"),
+								noimageinline => 1,
+								forcesubpage => 1));
+					}
 				}
 				if (length $config{cgiurl} && defined $type) {
 					$template->param(have_actions => 1);
@@ -186,19 +199,25 @@ sub preprocess_inline (@) { #{{{
 		}
 	}
 	
-	if ($feeds && $rss) {
-		will_render($params{page}, rsspage($params{page}));
-		writefile(rsspage($params{page}), $config{destdir},
-			genfeed("rss", $rssurl, $desc, $params{page}, @list));
-		$toping{$params{page}}=1 unless $config{rebuild};
-		$feedlinks{$params{destpage}}=qq{<link rel="alternate" type="application/rss+xml" title="RSS" href="$rssurl" />};
-	}
-	if ($feeds && $atom) {
-		will_render($params{page}, atompage($params{page}));
-		writefile(atompage($params{page}), $config{destdir},
-			genfeed("atom", $atomurl, $desc, $params{page}, @list));
-		$toping{$params{page}}=1 unless $config{rebuild};
-		$feedlinks{$params{destpage}}=qq{<link rel="alternate" type="application/atom+xml" title="Atom" href="$atomurl" />};
+	if ($feeds) {
+		if (exists $params{feedshow} && @list > $params{feedshow}) {
+			@list=@list[0..$params{feedshow} - 1];
+		}
+	
+		if ($rss) {
+			will_render($params{page}, rsspage($params{page}));
+			writefile(rsspage($params{page}), $config{destdir},
+				genfeed("rss", $rssurl, $desc, $params{page}, @list));
+			$toping{$params{page}}=1 unless $config{rebuild};
+			$feedlinks{$params{destpage}}=qq{<link rel="alternate" type="application/rss+xml" title="RSS" href="$rssurl" />};
+		}
+		if ($atom) {
+			will_render($params{page}, atompage($params{page}));
+			writefile(atompage($params{page}), $config{destdir},
+				genfeed("atom", $atomurl, $desc, $params{page}, @list));
+			$toping{$params{page}}=1 unless $config{rebuild};
+			$feedlinks{$params{destpage}}=qq{<link rel="alternate" type="application/atom+xml" title="Atom" href="$atomurl" />};
+		}
 	}
 	
 	return $ret;
@@ -236,7 +255,7 @@ sub date_822 ($) { #{{{
 
 	eval q{use POSIX};
 	error($@) if $@;
-	my $lc_time= POSIX::setlocale(&POSIX::LC_TIME);
+	my $lc_time=POSIX::setlocale(&POSIX::LC_TIME);
 	POSIX::setlocale(&POSIX::LC_TIME, "C");
 	my $ret=POSIX::strftime("%a, %d %b %Y %H:%M:%S %z", localtime($time));
 	POSIX::setlocale(&POSIX::LC_TIME, $lc_time);
@@ -248,7 +267,7 @@ sub date_3339 ($) { #{{{
 
 	eval q{use POSIX};
 	error($@) if $@;
-	my $lc_time= POSIX::setlocale(&POSIX::LC_TIME);
+	my $lc_time=POSIX::setlocale(&POSIX::LC_TIME);
 	POSIX::setlocale(&POSIX::LC_TIME, "C");
 	my $ret=POSIX::strftime("%Y-%m-%dT%H:%M:%SZ", localtime($time));
 	POSIX::setlocale(&POSIX::LC_TIME, $lc_time);
@@ -365,7 +384,7 @@ sub pingurl (@) { #{{{
 
 	eval q{require RPC::XML::Client};
 	if ($@) {
-		debug("RPC::XML::Client not found, not pinging");
+		debug(gettext("RPC::XML::Client not found, not pinging"));
 		return;
 	}
 
@@ -373,11 +392,11 @@ sub pingurl (@) { #{{{
 	defined(my $pid = fork) or error("Can't fork: $!");
 	return if $pid;
 	chdir '/';
-	eval q{use POSIX ’setsid’};
+	eval q{use POSIX 'setsid'};
 	setsid() or error("Can't start a new session: $!");
 	open STDIN, '/dev/null';
 	open STDOUT, '>/dev/null';
-	open STDERR, '>&STDOUT' or error("Can’t dup stdout: $!");
+	open STDERR, '>&STDOUT' or error("Can't dup stdout: $!");
 
 	# Don't need to keep a lock on the wiki as a daemon.
 	IkiWiki::unlockwiki();