From 8b70886afab7f1e779657174ad2ade1e8f6274ea Mon Sep 17 00:00:00 2001 From: Jarkko Saltiola Date: Wed, 13 Nov 2024 03:21:23 +0200 Subject: [PATCH] rename keyowrd -> keyword Assuming map-key-to-keyowrd was typo. --- src/statement.phel | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/statement.phel b/src/statement.phel index 9dc99e7..fe11d01 100644 --- a/src/statement.phel +++ b/src/statement.phel @@ -2,7 +2,7 @@ (defstruct statement [stmt]) -(defn- map-key-to-keyowrd [row] +(defn- map-key-to-keyword [row] (let [row (php-array-to-map row)] (reduce (fn [acc key] (put acc (keyword key) (row key))) @@ -11,7 +11,7 @@ (defn fetch "Fetches the next row from a result set" [statement] - (map-key-to-keyowrd + (map-key-to-keyword (php/-> (statement :stmt) (fetch (php/:: \PDO FETCH_ASSOC))))) @@ -26,7 +26,7 @@ (defn fetch-all "Fetches the remaining rows from a result set" [statement] - (map map-key-to-keyowrd + (map map-key-to-keyword (php/-> (statement :stmt) (fetchAll (php/:: \PDO FETCH_ASSOC)))))