diff options
Diffstat (limited to 'src/ellinika/test-conjugation.scm')
-rw-r--r-- | src/ellinika/test-conjugation.scm | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/src/ellinika/test-conjugation.scm b/src/ellinika/test-conjugation.scm index 83086bf..055138b 100644 --- a/src/ellinika/test-conjugation.scm +++ b/src/ellinika/test-conjugation.scm @@ -22,12 +22,10 @@ (ellinika cgi) (ellinika tenses) (ellinika conjugator) - (gamma sql)) + (ellinika sql)) (ellinika-cgi-init dict-template-file-name) -(define db-connection (sql-open-connection ellinika-sql-connection)) -(sql-query db-connection "SET NAMES utf8") - +(ellinika:sql-connect ellinika-sql-connection) (define transtab '(("act" . "Ενεργητηκή φωνή") @@ -59,7 +57,7 @@ (display "!")))) (display conj))))) (newline)) - (conjugator db-connection verb voice mood tense)) + (conjugator verb voice mood tense)) (gc)) (define-public (test-conjugation:voice voice verb) |