Сохраняющиеся в Snaplet проблемы с initPersistent

Я новичок в Haskell, пытаюсь использовать snaplet-persistent. Пытался следовать документации, но она не работает, появляется проблема:

src/Site.hs:120:32:
    No instance for (MonadBaseControl
                       IO (Initializer App PersistState))
      arising from a use of ‘initPersist’
    In the second argument of ‘($)’, namely
      ‘initPersist (runMigrationUnsafe migrateAuth)’
    In a stmt of a 'do' block:
      d <- nestSnaplet "db" db
           $ initPersist (runMigrationUnsafe migrateAuth)
    In the second argument of ‘($)’, namely
      ‘do { h <- nestSnaplet "" heist $ heistInit "templates";
            s <- nestSnaplet "sess" sess
                 $ initCookieSessionManager "site_key.txt" "sess" (Just 3600);
            d <- nestSnaplet "db" db
                 $ initPersist (runMigrationUnsafe migrateAuth);
            a <- nestSnaplet "auth" auth
                 $ initPersistAuthManager sess (persistPool $ view snapletValue d);
            .... }’

Запуск snaplet-persistent с github.


person Flávio Botelho    schedule 26.01.2015    source источник
comment
Можете ли вы показать код?   -  person Rufflewind    schedule 26.01.2015
comment
@Rufflewind репозиторий github   -  person Flávio Botelho    schedule 27.01.2015


Ответы (1)


Это было решено в github от eryx67

person Flávio Botelho    schedule 13.02.2015