From 8e0f5ca987182e50fbeefc4b4e199d64e7025d45 Mon Sep 17 00:00:00 2001
From: "Difrex(Denis Zheleztsov)" <dz@etegro.com>
Date: Mon, 12 May 2014 10:33:04 +0400
Subject: [PATCH] DB scheme changed. Added id column

---
 Database.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Database.pm b/Database.pm
index b435c63..3e64cf2 100644
--- a/Database.pm
+++ b/Database.pm
@@ -121,7 +121,7 @@ sub create_base {
         my $dbh = DBI->connect( "dbi:SQLite:dbname=$first_sqlite", "", "" );
         print "Create database schema\n";
         my $q_table
-            = "create table passwords(name VARCHAR(32), username VARCHAR(32),
+            = "create table passwords(id INTEGER PRIMARY KEY AUTOINCREMENT NOT NULL, name VARCHAR(32), username VARCHAR(32),
             resource TEXT, password TEXT)";
         $dbh->do($q_table);