diff --git a/lib/Pod/Simple/HTML.pm b/lib/Pod/Simple/HTML.pm
index 6e9359c..9635168 100644
--- a/lib/Pod/Simple/HTML.pm
+++ b/lib/Pod/Simple/HTML.pm
@@ -35,8 +35,8 @@ $Perldoc_URL_Postfix = ''
unless defined $Perldoc_URL_Postfix;
-our $Man_URL_Prefix = 'http://man.he.net/man';
-our $Man_URL_Postfix = '';
+our $Man_URL_Prefix = 'https://man7.org/linux/man-pages';
+our $Man_URL_Postfix = '.html';
our $Title_Prefix;
$Title_Prefix = '' unless defined $Title_Prefix;
@@ -797,7 +797,7 @@ sub resolve_man_page_link {
$section ||= 1;
return $self->man_url_prefix . "$section/"
- . $self->manpage_url_escape($page)
+ . $self->manpage_url_escape($page) . ".$section"
. $self->man_url_postfix;
}
@@ -1136,11 +1136,6 @@ This program is distributed in the hope that it will be useful, but
without any warranty; without even the implied warranty of
merchantability or fitness for a particular purpose.
-=head1 ACKNOWLEDGEMENTS
-
-Thanks to L for permission to use its
-L site for man page links.
-
=head1 AUTHOR
Pod::Simple was created by Sean M. Burke .
diff --git a/lib/Pod/Simple/XHTML.pm b/lib/Pod/Simple/XHTML.pm
index 84c3a2d..de8ee10 100644
--- a/lib/Pod/Simple/XHTML.pm
+++ b/lib/Pod/Simple/XHTML.pm
@@ -131,7 +131,7 @@ default.
In turning C<< L >> into http://whatever/man/1/crontab, what
to put before the "1/crontab". The default value is
-"http://man.he.net/man".
+"https://man7.org/linux/man-pages".
=head2 man_url_postfix
@@ -276,7 +276,7 @@ sub new {
my $new = $self->SUPER::new(@_);
$new->{'output_fh'} ||= *STDOUT{IO};
$new->perldoc_url_prefix('https://metacpan.org/pod/');
- $new->man_url_prefix('http://man.he.net/man');
+ $new->man_url_prefix('https://man7.org/linux/man-pages');
$new->html_charset('ISO-8859-1');
$new->nix_X_codes(1);
$new->{'scratch'} = '';
@@ -774,12 +774,12 @@ sub resolve_pod_page_link {
Resolves a man page link target and numeric section to a URL. The resulting
link will be returned for the above examples as:
- http://man.he.net/man5/crontab
- http://man.he.net/man1/crontab
+ https://man7.org/linux/man-pages/man5/crontab.5.html
+ https://man7.org/linux/man-pages/man1/crontab.1.html
Note that the first argument is required. The section number will be parsed
from it, and if it's missing will default to 1. The second argument is
-currently ignored, as L does not currently
+currently ignored, as L does not currently
include linkable IDs or anchor names in its pages. Subclass to link to a
different man page HTTP server.
@@ -905,11 +905,6 @@ This program is distributed in the hope that it will be useful, but
without any warranty; without even the implied warranty of
merchantability or fitness for a particular purpose.
-=head1 ACKNOWLEDGEMENTS
-
-Thanks to L for permission to use its
-L site for man page links.
-
=head1 AUTHOR
Pod::Simple::XHTML was created by Allison Randal .
diff --git a/t/fcodes_s.t b/t/fcodes_s.t
index 8c9f1ce..03fdca5 100644
--- a/t/fcodes_s.t
+++ b/t/fcodes_s.t
@@ -215,7 +215,7 @@ is(
# Test HTML output of links.
use Pod::Simple::HTML;
my $PERLDOC = "https://metacpan.org/pod";
-my $MANURL = "http://man.he.net/man";
+my $MANURL = "https://man7.org/linux/man-pages";
sub x {
Pod::Simple::HTML->_out(
sub { $_[0]->bare_output(1) },
diff --git a/t/xhtml01.t b/t/xhtml01.t
index 22c6f41..88a6f11 100644
--- a/t/xhtml01.t
+++ b/t/xhtml01.t
@@ -11,7 +11,7 @@ isa_ok ($parser, 'Pod::Simple::XHTML');
my $results;
my $PERLDOC = "https://metacpan.org/pod";
-my $MANURL = "http://man.he.net/man";
+my $MANURL = "https://man7.org/linux/man-pages";
initialize($parser, $results);
$parser->parse_string_document( "=head1 Poit!" );