From eec3a32f9d4b8e3023051b779dd18f8493865bf0 Mon Sep 17 00:00:00 2001 From: Chris Martin Date: Mon, 18 Sep 2023 15:56:21 -0600 Subject: [PATCH] typo: perist -> persist (#1514) --- persistent-postgresql/Database/Persist/Postgresql.hs | 2 +- persistent-sqlite/cbits/sqlite3.c | 2 +- persistent/Database/Persist/Class/PersistStore.hs | 2 +- persistent/Database/Persist/Sql/Orphan/PersistStore.hs | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-) diff --git a/persistent-postgresql/Database/Persist/Postgresql.hs b/persistent-postgresql/Database/Persist/Postgresql.hs index 5a513c806..056e6391a 100644 --- a/persistent-postgresql/Database/Persist/Postgresql.hs +++ b/persistent-postgresql/Database/Persist/Postgresql.hs @@ -1369,7 +1369,7 @@ showAlter table (DropReference cname) = T.concat , escapeC cname ] --- | Get the SQL string for the table that a PeristEntity represents. +-- | Get the SQL string for the table that a PersistEntity represents. -- Useful for raw SQL queries. tableName :: (PersistEntity record) => record -> Text tableName = escapeE . tableDBName diff --git a/persistent-sqlite/cbits/sqlite3.c b/persistent-sqlite/cbits/sqlite3.c index a82744931..50b5acdd9 100644 --- a/persistent-sqlite/cbits/sqlite3.c +++ b/persistent-sqlite/cbits/sqlite3.c @@ -53429,7 +53429,7 @@ static int writeSuperJournal(Pager *pPager, const char *zSuper){ } pPager->journalOff += (nSuper+20); - /* If the pager is in peristent-journal mode, then the physical + /* If the pager is in persistent-journal mode, then the physical ** journal-file may extend past the end of the super-journal name ** and 8 bytes of magic data just written to the file. This is ** dangerous because the code to rollback a hot-journal file diff --git a/persistent/Database/Persist/Class/PersistStore.hs b/persistent/Database/Persist/Class/PersistStore.hs index 6ef8d626c..85b9eab40 100644 --- a/persistent/Database/Persist/Class/PersistStore.hs +++ b/persistent/Database/Persist/Class/PersistStore.hs @@ -79,7 +79,7 @@ class (HasPersistBackend backend) => IsPersistBackend backend where -- @ -- foo :: -- ( 'PersistEntity' record --- , 'PeristEntityBackend' record ~ 'BaseBackend' backend +-- , 'PersistEntityBackend' record ~ 'BaseBackend' backend -- , 'IsSqlBackend' backend -- ) -- @ diff --git a/persistent/Database/Persist/Sql/Orphan/PersistStore.hs b/persistent/Database/Persist/Sql/Orphan/PersistStore.hs index f0334efb1..ce89b8f2c 100644 --- a/persistent/Database/Persist/Sql/Orphan/PersistStore.hs +++ b/persistent/Database/Persist/Sql/Orphan/PersistStore.hs @@ -80,7 +80,7 @@ whereStmtForKey conn k = whereStmtForKeys :: PersistEntity record => SqlBackend -> [Key record] -> Text whereStmtForKeys conn ks = T.intercalate " OR " $ whereStmtForKey conn `fmap` ks --- | get the SQL string for the table that a PeristEntity represents +-- | get the SQL string for the table that a PersistEntity represents -- Useful for raw SQL queries -- -- Your backend may provide a more convenient tableName function