diff options
author | Oliver Tappe | 2007-06-13 22:35:38 +0200 |
---|---|---|
committer | Oliver Tappe | 2007-06-13 22:35:38 +0200 |
commit | 9a93db94b0d4a052c964cedea738524ec3be3b3b (patch) | |
tree | b023b03d6d06f6d1a6c8bfb6ec752801cc3574c1 /config-db/devel-tools/test-config-db.pl | |
parent | LANG setup moved to /etc/default/locale (diff) | |
download | core-9a93db94b0d4a052c964cedea738524ec3be3b3b.tar.gz core-9a93db94b0d4a052c964cedea738524ec3be3b3b.tar.xz core-9a93db94b0d4a052c964cedea738524ec3be3b3b.zip |
* fixed all warnings indicated by 'perl -w'
git-svn-id: http://svn.openslx.org/svn/openslx/trunk@1162 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'config-db/devel-tools/test-config-db.pl')
-rwxr-xr-x | config-db/devel-tools/test-config-db.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/config-db/devel-tools/test-config-db.pl b/config-db/devel-tools/test-config-db.pl index c0d73d53..8a572e28 100755 --- a/config-db/devel-tools/test-config-db.pl +++ b/config-db/devel-tools/test-config-db.pl @@ -129,7 +129,7 @@ $metaDB->schemaChangeColumns('test2', 'descr' => 'description:s.30' }, $colDescrs); -my @rows = $metaDB->_doSelect("SELECT * FROM test2"); +@rows = $metaDB->_doSelect("SELECT * FROM test2"); foreach my $row (@rows) { foreach my $r (keys %$row) { print "$r = $row->{$r}\n"; |