Fork me on GitHub
#clojure-russia
<
2016-04-04
>
pacman07:04:25

Как-то дня 2-3 назад я жаловался на то что кложура грузит диск при компиляции с :aot :all . Вчера решился заюзать в проекте clojure 1.8 и все собиралось уже иначе. быстро и с кайфом. До этого использовал clojure 1.7

pacman07:04:09

так что SSD нам теперь не гораздо нужен

az07:04:52

"не гораздо нужен?” 😄

az07:04:00

ну с ним будет “более лучше"

dottedmag08:04:29

Кстати, господа, а знает ли кто способ сделать так, чтобы boot repl загружался не полчаса?

konukhov08:04:04

я загружаю один раз (с reloaded.repl) и просто из имакса подключаюсь к нему. если что-то поменялось, приходится переподключаться, но сам сервер нормально все релоадит – крайне редко приходится его перезапускать.

fxposter08:04:33

это же джава simple_smile

fxposter08:04:59

component и иже с ним - решают эти проблемы, но надо привыкнуть их юзать

konukhov08:04:38

ну и сам boot достаточно медленный (относительно lein того же), на самом деле. а так да, + component и (reset) из репла периодически.

rmuslimov08:04:12

@konukhov: > приходится переподключаться это как? это значит включиться выключить репл? или cider-connect?

konukhov08:04:07

cider-connect часто приходится делать, а под “переподключаться” имел в виду вырубить процесс и включить заново, да.

konukhov08:04:40

он иногда сходит с ума, если там ошибка в каком-то неймспейсе через неймспейс

rmuslimov08:04:40

что то это жесть какая то

konukhov08:04:46

почему жесть?

rmuslimov08:04:18

ну к локальному емаксу подключаться через cider-connect

rmuslimov08:04:31

потом у сидра есть втроенный рефреш

rmuslimov08:04:57

потом на него повесить хук который рестартует систему

rmuslimov08:04:16

и просто кейбиндингом C-c C-x

rmuslimov08:04:20

все перезагрузить

konukhov08:04:16

а, ну это я не настроил значит simple_smile

rmuslimov08:04:48

вот примерно так: (setq cider-refresh-before-fn "user/stop-system" cider-refresh-after-fn "user/start-system”)

konukhov08:04:07

спасибо!

dottedmag08:04:37

drip уменьшает время нинасколько. С 14.0 секунд до 13.9

pacman08:04:41

Кто работает с OM? постоянно при старте сыпятся сосбщения Warning: Don't set .props.children of the React component. Instead, specify the correct value when initially creating the element or use React.cloneElement to make a new element with updated props.react.inc.js:19588 Warning: Don't set .props.om_init_state of the React component. Instead, specify the correct value when initially creating the element or use React.cloneElement to make a new element with updated props. к первому уже привык.. вроде Нолен говорит что фигня. Второе интересует. оно не страшное???

a.espolov08:04:15

@pacman: ошибка в реакте а не оме

pacman08:04:30

ну вот начинал с OM 0.8 и не было сообщений всяких. Потом как перешел на 0.9 то появляются вот эти при старте приложения

pacman08:04:02

насколько я помню в 0.8 использовался React 12 а в 0.9 React 13

pacman08:04:32

чтото нашел на эту тему

andfadeev12:04:46

народ, помогите сделать красиво, у меня чет уродец получился(

(map (fn [v] (dissoc
              (merge (first v)
                     {:chats (reduce conj [] (map (fn [e] {:chat_id (:chat_id e)}) v))})
              :chat_id))
     (vals (group-by :account_id '({:account_id 1, :name "Name 1",  :chat_id 1}
                                   {:account_id 1, :name "Name 1",  :chat_id 2}
                                   {:account_id 2, :name "Name 2", :chat_id 2}))))

artemyarulin12:04:44

‘( а почему лист а не просто вектор?

andfadeev12:04:03

это имеет значение?

andfadeev12:04:26

ну как вариант из базы приходит лист а не вектор

artemyarulin12:04:30

неа, просто бросилось в глаза

artemyarulin12:04:38

может для начала через threading??

(->> [{:account_id 1, :name "Name 1",  :chat_id 1}
      {:account_id 1, :name "Name 1",  :chat_id 2}
      {:account_id 2, :name "Name 2", :chat_id 2}]
     (group-by :account_id)
     vals
     (map (fn [v] (dissoc
              (merge (first v)
                     {:chats (reduce conj [] (map (fn [e] {:chat_id (:chat_id e)}) v))})
              :chat_id)))

andfadeev12:04:03

меня вот эта часть волнует

andfadeev12:04:15

(fn [v] (dissoc
              (merge (first v)
                     {:chats (reduce conj [] (map (fn [e] {:chat_id (:chat_id e)}) v))})
              :chat_id)))

artemyarulin12:04:39

а чо оно делает?:)

andfadeev12:04:06

({:account_id 1, :name Name 1, :chats [{:chat_id 1} {:chat_id 2}]} {:account_id 2, :name Name 2, :chats [{:chat_id 2}]})

nicola13:04:42

select-keys

andfadeev15:04:48

круто да, спасибо

rmuslimov16:04:27

мне кажется это получше, вместо vvv твой лист

az19:04:56

как не вовремя …

andmed19:04:06

в смысле?

az19:04:42

да где он раньше был )

andmed19:04:48

Испанцы -- народ импульсивный