X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FDoNewPkg.pm;h=059d5a33fa5e859d3dad1c6bc07d884547ac3ff6;hb=f9f183095d5100a9cecc864361e19881601d780f;hp=73cd981a0a36261d244a0eaec419c6055e5e227e;hpb=01393b020237bbfa4571d41cc98899b4d25acd8b;p=deb%2Fpackages.git

diff --git a/lib/Packages/DoNewPkg.pm b/lib/Packages/DoNewPkg.pm
index 73cd981..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.gz\">".
+	    _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";