diff options
| -rw-r--r-- | lib/Dakkar/TweetArchive/Store.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/Dakkar/TweetArchive/Store.pm b/lib/Dakkar/TweetArchive/Store.pm index b716166..041f506 100644 --- a/lib/Dakkar/TweetArchive/Store.pm +++ b/lib/Dakkar/TweetArchive/Store.pm @@ -104,12 +104,16 @@ SQL sub _ensure_schema($self,$dbh) { # simple-minded schema version management - $dbh->do(<<'SQL'); + { + # silence the 'NOTICE: relation "meta" already exists, skipping' + local $dbh->{PrintWarn} = 0; + $dbh->do(<<'SQL'); CREATE TABLE IF NOT EXISTS meta ( version INTEGER PRIMARY KEY, created_at TIMESTAMP WITH TIME ZONE NOT NULL DEFAULT CURRENT_TIMESTAMP ) SQL + } my $current_version = $dbh->selectall_arrayref( q{SELECT max(version) FROM meta} )->[0][0]; |