agr
дыбр SQL yesod погроммирование проектное через час после включения новой фичи в телегу прилетает сообщение об ошибке. странное сообщение о том, почему Int не равен Null. оказывается, это древняя багофича persistent: select sum(x) from ... where ... при отсутствии данных persistent сходит с ума и приводит типы не туда. ну ок, пофикшено другим запросом. теперь интересно, сколько отказов в связи с этим было..
agr
дыбр yesod проектное — запилил апгрейд на 8.4.3 (да-да, скоро опять апгрейдить).
— пофиксил связку yesod + fay (снойман респектанул), я вот честно не знаю, кто ещё кроме меня эту дичь юзает.
— запилил форму обратной связи на сайтег и всякую мелочевку с отправкой там письма куда надо.
— с локалхоста вижу ругань от гугла на sendmail: "вай-вай-вай, доки почитай!"
agr
code systemd yesod
[Unit]
Description=My awesome website
After=nginx.service

[Install]
WantedBy=multi-user.target

[Service]
WorkingDirectory=/absolute/path/to/directory
User=user
ExecStart=/absolute/path/to/executable config/settings.yml
matero
haskel yesod делать было нечего и я решил поставить haskel фреймворк yesod.
с такой долгой установкой я первый раз столкнулся
команды stack build yesod-bin cabal-install --install-ghc и stack build накачали тонны неведомых файлов.
запускаю stack exec — yesod devel тоже не менее 10 минут всё компилилось

размер полученного проекта оказался (уф...) не больше метра

Теперь вот думаю сильно ли сложно на основе этой заготовки какой-нить бложек с авторизацией замутить?...

segfault
Haskell например yesod Было бы не плохо вместо тупого Vault в йесоде использовать DMap. И тебе защита от неправильного приведения типов, и вполне себе явный список ключей, доступный в одном месте, и защита от не правильного приведения типов. DM вообще можно применить много где ...
b0oh
Haskell yesod жуйк выручай, ща у меня морда треснет от натуги, как в йесоде сделать из EntityField Tag (Key Tag) просто PersistValue?
пример кода:
getTagR tagId = do
tags <- (runDB $ rawSql "select ?? from tag where tag.id = ?" [tagId]) :: Handler [Entity Tag]
...
b0oh
Haskell yesod решил в качестве дз повторить на йесоде ruhaskell.org, и вот написал такой код, для того что бы ссылки разделялись запятой
$with categoriesCount <- length categories
$forall (Entity categoryId category, ix) <- zip categories ints
<a href=@{CategoryR categoryId}>
#{categoryTitle category}
<span .badge-for-tag-link>1
$if ix < (categoriesCount — 1)
, #
помимо удивления, что в гамлете нельзя использовать [0..], появился вопрос: можно ли это сделать прилично?
provaton
Haskell yesod Ну вот, небольших успехов добился. Подытожу наблюдения за сегодня:
1. yesod в целом очень неплох, цельный и продуманный фреймворк.
2. компилирующиеся темплейты — мегакрутая идея.
3. Тайп-сейф урлы — шикарно
4. роутинг и хендлеры — нормально
5. виджеты — отличная концепция
6. Не совсем разобрался с наследованием темплейтов, с лайаутами
7. Персистент — говно, которое даже до джанговского ОРМ и близко не дотягивает, не говоря уже об алхимии. Умеет только простейшие вещи, в более-менее сложных нужно писать SQL руками, что нивелирует все заявленные преимущества этого самого персистенса. Шутка ли, даже LIKE не умеет!
8. кондуит — хорошая идея, если реализация соответствует заявленным параметрам, то очень хорошо.
9. Все абстракции по делу, темплейт хаскелл использован только там, где без него совсем туго.
Вывод — для себя можно писать, и оттачивать навыки, в продакшен пока не рискнул бы. Все-таки, без нормального ОРМ там туговато будет.
segfault
Haskell form yesod А кто у нас тут раскурил, нахуя нужны AForm когда есть MForm? И почему в Foundation.hs есть
type Form x = Html -> MForm (HandlerT App IO) (FormResult x, Widget)
Что за хуйня? Почему именно такой тип, зачем Form принимает Html ?
segfault
? Haskell yesod А есть в йесоде возможность определять роуты монадически? Синтаксис квазиквотера убог, да и ничем не пизже монадочки, вообще не понимаю нахер надо было делать именно так.
dr-Chaos
WTF Amazon Haskell aws yesod Пока не поменял ендпоинт европейскому бкету на EU-шный. При аплоаде периодически пугал меня ошибками
hClose: resource vanished
и
FailedConnectionException "bucket_name.s3.amazonaws.com" 443
после удаления. Хотя и удалял
Срань какая-то...
dr-Chaos
WTF Haskell cabal yesod блин какая-то магия. Делаю всё то же что и в #2522513 , но не в виртуалке. Не хочет собираться, как залипло. Кажет ошибку :

Resolving dependencies...
cabal: Could not resolve dependencies:
trying: AxxonCloud-0.0.1 (user goal)
trying: asn1-types-0.2.1 (dependency of AxxonCloud-0.0.1)
next goal: yesod-platform (dependency of AxxonCloud-0.0.1)
rejecting: yesod-platform-1.2.4.2, 1.2.4.1, 1.2.4 (conflict:
asn1-types==0.2.1, yesod-platform => asn1-types==0.2.0)
rejecting: yesod-platform-1.2.3, 1.2.2, 1.2.1, 1.2.0.1, 1.2.0, 1.1.9.1, 1.1.9,
1.1.8, 1.1.7.2, 1.1.7.1, 1.1.7, 1.1.6.1, 1.1.6, 1.1.5, 1.1.4.1, 1.1.4, 1.1.3,
1.1.2, 1.1.1, 1.1.0, 1.0.6.1, 1.0.6, 1.0.5, 1.0.4.2, 1.0.4.1, 1.0.4, 1.0.3.4,
1.0.3.3, 1.0.3.2, 1.0.2, 1.0.1, 1.0.0, 0.10.3, 0.10.2 (conflict: AxxonCloud =>
yesod-platform>=1.2.4 && <1.3)
Backjump limit reached (change with --max-backjumps).
Note: when using a sandbox, all packages are required to have consistent
dependencies. Try reinstalling/unregistering the offending packages or
recreating the sandbox.
cabal-meta:
log of commands saved to: /home/yuriy-shelyag/sandboxes/axxoncloud/.shelly/4.txt
Exception: error running: cabal install hashable -fsse41 /home/yuriy-shelyag/sandboxes/axxoncloud/ vendor/starling
exit status: 1
stderr: cabal: Could not resolve dependencies:
trying: AxxonCloud-0.0.1 (user goal)
trying: asn1-types-0.2.1 (dependency of AxxonCloud-0.0.1)
next goal: yesod-platform (dependency of AxxonCloud-0.0.1)
rejecting: yesod-platform-1.2.4.2, 1.2.4.1, 1.2.4 (conflict:
asn1-types==0.2.1, yesod-platform => asn1-types==0.2.0)
rejecting: yesod-platform-1.2.3, 1.2.2, 1.2.1, 1.2.0.1, 1.2.0, 1.1.9.1, 1.1.9,
1.1.8, 1.1.7.2, 1.1.7.1, 1.1.7, 1.1.6.1, 1.1.6, 1.1.5, 1.1.4.1, 1.1.4, 1.1.3,
1.1.2, 1.1.1, 1.1.0, 1.0.6.1, 1.0.6, 1.0.5, 1.0.4.2, 1.0.4.1, 1.0.4, 1.0.3.4,
1.0.3.3, 1.0.3.2, 1.0.2, 1.0.1, 1.0.0, 0.10.3, 0.10.2 (conflict: AxxonCloud =>
yesod-platform>=1.2.4 && <1.3)
Backjump limit reached (change with --max-backjumps).
Note: when using a sandbox, all packages are required to have consistent
dependencies. Try reinstalling/unregistering the offending packages or
recreating the sandbox.
dr-Chaos
WTF Haskell yesod Чувствую себя дибилом. #2521749 . Сделал всё начисто — работает.
Т.е. удалил весь локальный кабал, поставил системный, им поставил последнюю версию локально, прибил системный, вышел из баша , добавил ~/.cabal/bin в пути ; поставил cabal-meta и cabal-src , создал сендбокс, поставил сборку. И оно, сука, собралось.
dr-Chaos
WTF Haskell yesod я так понял прописывать в cabal-файл зависимост от yesod-platform проставлять бессмысленно. Платфоорму надо просто поставить, а затем собирать свой пакет?
kb
yesod Наконец-то домучал
github.com

А вчера взялся за новую сверхзадачу — при пост-запросе распарсить
JSON, провалидировать через форму и создать объект вида {"foo":
"bar"}. Начал копаться в формах — ох там и типы, голову сломать
можно. Всерьез уже подумываю слазить с yesod, т.к. ну слишком криво и
сложно вникать в это всё.
kb
Haskell yesod Таки, кажется, сделал возможность послать данные через POST в тесте. github.com

// ну и код в этом yesod-test, конечно. Даже мне понятно что фигня. Плюс много сомнений по поводу поддержки стандартов.
dr-Chaos
WTF code Haskell yesod persist
Забавный прикол 
Этот хендлер отправляет приложение в SegFault

getFileMetaR  fileId = do
    File {..} <- runDB $ get404 fileId
    returnJson $ object ["id" .= fileId, "mime-type" .= fileMimetype, "ttl" .= fileTtl]

а этот нет
getFileMetaR  fileId = do
    File {..} <- fromJust404 $ runDB $ get fileId
    returnJson $ object ["id" .= fileId, "mime-type" .= fileMimetype, "ttl" .= fileTtl]

Где 
fromJust404 ::MonadHandler m => m (Maybe a) -> m a
fromJust404 l = l >>= maybe notFound return

а get404 http://hackage.haskell.org/packages/archive/yesod-persistent/1.2.0/doc/html/src/Yesod-Persist.html#get404
dr-Chaos
? Haskell tests yesod hspec Господа, подскажите как лучше сделать.
Задача: тестирование веб приложения на yesod.
Как я это себе вижу — идёт последовательно несколько тестов:
1. Добавление пользователя
2. Добавление этому пользователю некоего хранилища с секретом для подписывания (здесь мы где-то запоминаем id хранилища и секрет)
3. Добавление файлов в это хранилище.

Т.е. мне надо как-то шарить состояние между тестами. А hspec такого не умеет :( github.com И походу yesod.test основанный на нём не умеет тоже.
Можно, конечно, погдотовить некое тестовое окружение, т.е. добавить в базу нужные значения и пользоваться захардкожеными значениями.
Возможно, есть какие-то готовые рекомндации или всё самому?
kb
Haskell yesod Persistent прямо поразил своей красотой и чистотой. То, что в ООП-языках приходится делать при помощи создания уродских сущностей, сочетающих в себе и БД-данные и бизнес-модели, там разделили на уровне типов (пусть иногда и сложноватых).