fixed links to bzr trees

git-svn-id: file:///home/svn/build-farm/trunk@485 1e5ffdc8-eadd-0310-9daa-9cb4117fe24b

diff --git a/web/history.pm b/web/history.pm
index 7347dd921cf01272e28f0475af1a0bcb32615474..1c0ce55edb427770c09ed83fb19f1a7ef277cb29 100644 (file)
--- a/web/history.pm
+++ b/web/history.pm
@@ -21,6 +21,7 @@ my $req = new CGI;
 my $HEADCOLOR = "#a0a0e0";
 my $CVSWEB_BASE = "http://pserver.samba.org/cgi-bin/cvsweb";
 my $VIEWCVS_BASE = "http://websvn.samba.org/cgi-bin/viewcvs.cgi";
+my $UNPACKED_BASE = "http://websvn.samba.org/ftp/unpacked/";
 
 # a map of names to web svn log locations
 my (%svn_trees) = ('samba' => " <a href=\"$VIEWCVS_BASE/trunk/%s?root=samba\">%s</a>",
@@ -46,7 +47,7 @@ my (%cvs_trees) = ('rsync' => " <a href=\"$CVSWEB_BASE/rsync/%s\">%s</a>",
                   'ppp' => " <a href=\"$CVSWEB_BASE/ppp/%s\">%s</a>");
 
 # a map of names to bzr paths
-my (%bzr_trees) = ('ctdb' => " <a href=\"$CVSWEB_BASE/bzr/%s\">%s</a>");
+my (%bzr_trees) = ('ctdb' => " <a href=\"$UNPACKED_BASE/ctdb/%s\">%s</a>");
 
 my $unpacked_dir = "/home/ftp/pub/unpacked";