From: Frank Lichtenheld <frank@lichtenheld.de>
Date: Thu, 2 Mar 2006 00:00:17 +0000 (+0000)
Subject: Use new url creating mechanisms
X-Git-Tag: switch-to-templates~25
X-Git-Url: https://git.deb.at/?p=deb%2Fpackages.git;a=commitdiff_plain;h=85a7284b1c7d744c88d14132f26226474aba78ae;ds=sidebyside

Use new url creating mechanisms
---

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";