avoid warning

2011-03-25 12:15:34 +00:00 · 2011-03-25 12:15:34 +00:00 · 440f4f67db
parent 3f08edbd25
commit 440f4f67db
1 changed files with 1 additions and 1 deletions
--- a/scripts/cleanup
+++ b/scripts/cleanup
@ -59,7 +59,7 @@ for my $session (@$sessions) {
 }

 # remove orphaned records:
-my $sessions
+$sessions
    = $dbh->selectcol_arrayref(
        q{select s.id from instances i right outer join sessions s  on i.session=s.id where i.id is null}
      );