+link rel

[www.jankratochvil.net.git] / project / captive / doc / Related.html.pl

diff --git a/project/captive/doc/Related.html.pl b/project/captive/doc/Related.html.pl
index ba147d3..98de84d 100755 (executable)
--- a/project/captive/doc/Related.html.pl
+++ b/project/captive/doc/Related.html.pl
@@ -27,16 +27,16 @@ use warnings;
 
 BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
 use My::Web;
-require "CGI";
-use project::captive::doc::Macros;
+require CGI;
+BEGIN { Wuse 'project::captive::doc::Macros'; }
 
 
-My::Web->init(
+project::captive::doc::Macros->init(
                "__PACKAGE__"=>__PACKAGE__,
                "title"=>'Captive NTFS Developer Documentation: Related Projects',
-               "head_css"=>$doc_Macros_head_css,
+               "rel_prev"=>'TODO.html.pl',
+               "rel_next"=>'LinuxNTFS.html.pl',
                );
-My::Web->heading();
 
 
 print <<"HERE";
@@ -75,7 +75,7 @@ print <<"HERE";
 
                <p>DOS based @{[ a_href 'http://www.gnu.org/licenses/gpl.html','GPL-2.0' ]}
                read-write NTFS driver. Filesystem structures are reverse engineered in the
-               way of @{[ a_href '#LinuxNTFScompet','Linux-NTFS Project' ]}. As it is not very
+               way of @{[ a_href 'Related.html.pl#LinuxNTFScompet','Linux-NTFS Project' ]}. As it is not very
                actively maintained it reaches a&nbsp;lower level of
                <span class="productname">NTFS</span> compatibility.</p>
 
@@ -88,7 +88,7 @@ print <<"HERE";
                a network file sharing through a&nbsp;VMware virtual network card.</p>
 
                <p>You need @{[ '$299' ]} for this product and you need to
-               give up your system security by running un@{[ a_href '#sandbox','sandbox' ]}ed
+               give up your system security by running un@{[ a_href 'Details.html.pl#sandbox','sandbox' ]}ed
                closed-source program in your GNU/Linux.</p>
 
        <a name="wine"><h2>@{[ a_href 'http://www.winehq.com/','Wine Project' ]}</h2></a>
@@ -119,4 +119,4 @@ print <<"HERE";
 HERE
 
 
-My::Web->footer();
+project::captive::doc::Macros->footer();