redirect Surprise pages

diff --git a/project/captive/doc/TODO.html.pl b/project/captive/doc/TODO.html.pl
index d0d7f4f..a97dc29 100755 (executable)
--- a/project/captive/doc/TODO.html.pl
+++ b/project/captive/doc/TODO.html.pl
@@ -64,12 +64,12 @@ print <<"HERE";
 
 
 <a name="todo_surprise"><h1>TODO: NTFS Support for
-               <span class="productname">@{[ a_href 'http://surprise.sourceforge.net/','Partition Surprise' ]}</span></h1></a>
+               <span class="productname">@{[ a_href top_dir().'/project/surprise/','Partition Surprise' ]}</span></h1></a>
 
        <p>Although there currently exists
        <span class="productname">@{[ a_href 'http://mlf.linux.rulez.org/mlf/ezaz/ntfsresize.html','ntfsresize' ]}</span>
        I am not sure whether it is really reliable for all NTFS filesystems.
-       <span class="productname">@{[ a_href 'http://surprise.sourceforge.net/','Partition Surprise' ]}</span>
+       <span class="productname">@{[ a_href top_dir().'/project/surprise/','Partition Surprise' ]}</span>
        is the only partition manager capable of safely resize the disk
        by using just the original W32 filesystem driver by full rebuild of
        filesystem metadata.