s473615/HasswordManager
2
1
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

remove comment

Browse Source
This commit is contained in:
s473615 2024-05-27 17:47:04 +02:00
parent 6a4f9a1e21
commit 138927fe47
1 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Database.hs
View File

@ -36,10 +36,6 @@ create_db :: Connection -> IO ()
create_db conn = do create_db conn = do
execute_ conn "CREATE TABLE IF NOT EXISTS entries (entryId INTEGER PRIMARY KEY AUTOINCREMENT, entryService TEXT, entryLogin TEXT, entryPassword TEXT)" execute_ conn "CREATE TABLE IF NOT EXISTS entries (entryId INTEGER PRIMARY KEY AUTOINCREMENT, entryService TEXT, entryLogin TEXT, entryPassword TEXT)"
execute_ conn "CREATE TABLE IF NOT EXISTS mpass (mpassId INTEGER PRIMARY KEY AUTOINCREMENT, hash INTEGER)" execute_ conn "CREATE TABLE IF NOT EXISTS mpass (mpassId INTEGER PRIMARY KEY AUTOINCREMENT, hash INTEGER)"
-- execute conn "INSERT INTO entries (entryId, entryLogin, entryPassword) VALUES (?,?,?)" (Entry 1 "admin" "admin")
-- rowId <- lastInsertRowId conn
-- r <- query_ conn "SELECT * from hassword" :: IO [Entry]
-- mapM_ print r
is_it_first_app_usage :: Connection -> IO Bool is_it_first_app_usage :: Connection -> IO Bool
is_it_first_app_usage conn = do is_it_first_app_usage conn = do