X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FDoNewPkg.pm;h=059d5a33fa5e859d3dad1c6bc07d884547ac3ff6;hb=3f085acbf01251255c4f6e4786b0439ff424d979;hp=015d0559b49577d2348c8dc4cce3d71d6e7747f4;hpb=416227e3eff75fb13c805ec723a414f54bc7c372;p=deb%2Fpackages.git

diff --git a/lib/Packages/DoNewPkg.pm b/lib/Packages/DoNewPkg.pm
index 015d055..059d5a3 100644
--- a/lib/Packages/DoNewPkg.pm
+++ b/lib/Packages/DoNewPkg.pm
@@ -101,9 +101,9 @@ sub do_newpkg {
 	    }
 	}
 
-	$$page_content .= '<p class="psmallcenter"><a href="$ROOT/$suite/allpackages" title="'.
+	$$page_content .= '<p class="psmallcenter"><a href="'.make_url('allpackages','').'" title="'.
 	    _g( "List of all packages" ) ."\">".
-	    _g( "All packages" ) ."</a><br>(<a href=\"$ROOT/$suite/allpackages?format=txt\">".
+	    _g( "All packages" ) ."</a><br>(<a href=\"".make_url('allpackages','',{format=>'txt.gz'})."\">".
 	    _g( "compact compressed textlist" )."</a>)<br>".
 	    ($slist ? sprintf(_g( "New packages in %s" ), $slist ):'').
 	    "</p>\n";