$xurls{$n} = "$n.html";
}
-for (qw[copydatabase(1) xapian-compact(1)]) {
- my ($n) = (/([\w\-\.]+)/);
- $xurls{$_} = ".$n.1.html"
-}
-
-for (qw[make(1) flock(2) setrlimit(2) vfork(2) tmpfs(5)]) {
+for (qw[make(1) flock(2) setrlimit(2) vfork(2) tmpfs(5) inotify(7) unix(7)
+ syslog(3)]) {
my ($n, $s) = (/([\w\-]+)\((\d)\)/);
- $xurls{$_} = "http://www.man7.org/linux/man-pages/man$s/$n.$s.html";
+ $xurls{$_} = "https://www.man7.org/linux/man-pages/man$s/$n.$s.html";
}
for (qw[git(1)
git-init(1)
git-send-email(1)
gitrepository-layout(5)
+ gitglossary(7)
]) {
my ($n) = (/([\w\-\.]+)/);
$xurls{$_} = "https://kernel.org/pub/software/scm/git/docs/$n.html"
$xurls{$_} = "https://www.freedesktop.org/software/systemd/man/$n.html";
}
+# favor upstream docs if they exist, use manpages.debian.org if they don't
$xurls{'netrc(5)'} = 'https://manpages.debian.org/stable/ftp/netrc.5.en.html';
$xurls{'mbsync(1)'} =
'https://manpages.debian.org/stable/isync/mbsync.1.en.html';
$xurls{'prove(1)'} = 'https://perldoc.perl.org/prove.html';
$xurls{'mbox(5)'} = 'https://manpages.debian.org/stable/mutt/mbox.5.en.html';
$xurls{'mmdf(5)'} = 'https://manpages.debian.org/stable/mutt/mmdf.5.en.html';
+$xurls{'mutt(1)'} = 'https://manpages.debian.org/stable/mutt/mutt.1.en.html';
+$xurls{'torsocks(1)'} =
+ 'https://manpages.debian.org/stable/torsocks/torsocks.1.en.html';
+$xurls{'curl(1)'} = 'https://manpages.debian.org/stable/curl/curl.1.en.html';
+$xurls{'copydatabase(1)'} =
+ 'https://manpages.debian.org/stable/xapian-tools/copydatabase.1.en.html';
+$xurls{'xapian-compact(1)'} =
+ 'https://manpages.debian.org/stable/xapian-tools/xapian-compact.1.en.html';
+$xurls{'gzip(1)'} = 'https://manpages.debian.org/stable/gzip/gzip.1.en.html';
+$xurls{'chmod(1)'} =
+ 'https://manpages.debian.org/stable/coreutils/chmod.1.en.html';
+$xurls{'kqueue(2)'} =
+ 'https://www.freebsd.org/cgi/man.cgi?query=kqueue&sektion=2';
+$xurls{'notmuch(1)'} = 'https://notmuchmail.org/manpages/notmuch-1/';
+$xurls{'mairix(1)'} =
+ 'https://manpages.debian.org/stable/mairix/mairix.1.en.html';
my $str = do { local $/; <STDIN> };
my ($title) = ($str =~ /\A([^\n]+)/);
"<title>$title</title>",
"</head><body><pre>", $str , '</pre></body></html>';
STDOUT->flush;
-
-# keep mtime on website consistent so clients can cache
-if (-f STDIN && -f STDOUT) {
- my @st = stat(STDIN);
- utime($st[8], $st[9], \*STDOUT);
-}