From fd9077056f7f33c60b218636ead0644d42e75a09 Mon Sep 17 00:00:00 2001 From: Jeffrey Armstrong Date: Sat, 27 Mar 2021 16:50:20 -0400 Subject: Minor cleanup of the template code. Started on main program handling requests. --- captain/db.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'captain/db.f90') diff --git a/captain/db.f90 b/captain/db.f90 index 6624cc1..5fbd0b4 100644 --- a/captain/db.f90 +++ b/captain/db.f90 @@ -37,7 +37,7 @@ contains type(sqlite3_stmt)::stmt if(stmt%prepare(db, "INSERT INTO players(name, token) VALUES(?, ?)") == SQLITE_OK) then - if(stmt%bind_text(1, "name!") == SQLITE_OK .and. stmt%bind_text(2, "token!") == SQLITE_OK) then + if(stmt%bind_text(1, name) == SQLITE_OK .and. stmt%bind_text(2, token) == SQLITE_OK) then call stmt%step_now() end if end if -- cgit v1.2.3