X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=scripts%2Fdebian%2Fftpstats.R;h=c6325233256b011c71fdd766d097c841c7f1590e;hb=d31ae14a9de247d47d9ff7b3f36705a58a065916;hp=e5ace927930f88158ebc42b97d43d2c9d38da271;hpb=4e69ef3ff83607cf48ef06d43409392e3b97475c;p=dak.git

diff --git a/scripts/debian/ftpstats.R b/scripts/debian/ftpstats.R
index e5ace927..c6325233 100644
--- a/scripts/debian/ftpstats.R
+++ b/scripts/debian/ftpstats.R
@@ -9,7 +9,7 @@ plotsize <- function(file,title,p,height=11.8,width=16.9) {
 	barplot(t(p),col = 1:19, main=title,
 		xlab="date", ylab="size (MiB)")
 	legend(par("usr")[1]+xinch(5),par("usr")[4]-yinch(0.1),legend=colnames(t),
-		ncol=3,fill=1:19,xjust=1,yjust=1)
+		ncol=2,fill=1:19,xjust=1,yjust=1)
 }
 t <- (read.table("/srv/ftp-master.debian.org/misc/ftpstats.data",sep=",",header=0,row.names=1,col.names=cname))/1024/1024
 v <- t[(length(t$all)-90):(length(t$all)),1:19]