This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# IMPORTANT: This file is generated by cucumber-rails - edit at your own peril. | |
# It is recommended to regenerate this file in the future when you upgrade to a | |
# newer version of cucumber-rails. Consider adding your own code to a new file | |
# instead of editing this one. Cucumber will automatically load all features/**/*.rb | |
# files. | |
require File.expand_path(File.join(File.dirname(__FILE__), "..", "support", "paths")) | |
# Commonly used webrat steps |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns common-spec.coerce | |
(:refer-clojure :exclude [def]) | |
(:require [clojure.spec.alpha :as s] | |
[clojure.walk :as walk]) | |
(:import (java.util UUID))) | |
(s/def ::coerce-fn | |
(s/fspec :args (s/cat :x string?) :ret any?)) | |
(defonce ^:private registry-ref (atom {})) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(om/defui ^:once QueuedVideo | |
static uc/InitialAppState | |
(initial-state [_ title] {::video/id (random-uuid) | |
::video/title title}) | |
static om/IQuery | |
(query [_] [::video/id | |
::video/watched? | |
{::video/snippet | |
[::video/title |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(om/defui ^:once QueuedVideo | |
static uc/InitialAppState | |
(initial-state [_ title] {::video/id (random-uuid) | |
::video/title title}) | |
static om/IQuery | |
(query [_] [::video/id | |
::video/watched? | |
{::video/snippet | |
[::video/title |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns ygq.background.main | |
(:require-macros [cljs.core.async.macros :refer [go]]) | |
(:require [cljs.core.async :as async :refer [<!]] | |
[chrome.rpc :as rpc] | |
[ygq.background.parser :as p] | |
[google.api :as g])) | |
(defonce comm-listener | |
(go | |
(let [rpc (rpc/listen (async/chan 10)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns ygq.popup.core | |
(:require-macros [cljs.core.async.macros :refer [go]]) | |
(:require [untangled.client.core :as uc] | |
[cljs.core.async :as async :refer [<!]] | |
[chrome.rpc :as rpc] | |
[google.api :refer [get-auth-token]] | |
[untangled.client.network :as un])) | |
(defrecord Network [complete-app] | |
un/NetworkBehavior |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(def data | |
{:person/name "Bla" | |
:person/child {:child/something "other" | |
:child/bla {:subchild/entry "blabla"}}}) | |
(def MapWalker | |
(sp/recursive-path [] p | |
(sp/if-path map? | |
(sp/continue-then-stay sp/MAP-VALS p)))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(om/defui ^:once BasicChannelView | |
static om/IQuery | |
(query [_] [:channel/id {:channel/snippet [:channel/title]}])) | |
(om/defui ^:once ComplexChannelView | |
static om/IQuery | |
(query [_] [:channel/id | |
{:channel/snippet | |
[:channel/title | |
{:channel/thumbnails |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[{[:video/by-id "XHGKIzCcVa0"] | |
[{:video/snippet | |
[:video/title | |
:video/description | |
:video/published-at | |
{:video/channel | |
[{:channel/snippet | |
[:channel/title | |
{:channel/thumbnails |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[org.clojure/clojure "1.9.0-alpha14"] | |
[org.clojure/clojurescript "1.9.494"] | |
[org.omcljs/om "1.0.0-alpha48"] | |
[clj-http "3.4.1"] | |
[cheshire "5.7.0"] | |
[camel-snake-kebab "0.4.0"] |