Don't allow records with dollar signs through.

[moira.git] / gen / ca.gen

diff --git a/gen/ca.gen b/gen/ca.gen
index ed75b5d157a4995087ff9cc9d0dfe9ef6df4318d..3842f13e4f7ab588902578fc05ad53254eaf348d 100755 (executable)
--- a/gen/ca.gen
+++ b/gen/ca.gen
@@ -54,6 +54,7 @@ $sth = $dbh->prepare("SELECT UNIQUE u.login, u.fullname, f.name ".
 
 $sth->execute || exit $MR_DBMS_ERR;
 
+$last = "";
 while (($login, $name, $dir) = $sth->fetchrow_array) {
     $dir =~ /(\/.*)\//;
     $path = $1;