Skip to content

Instantly share code, notes, and snippets.

Gal Dolber galdolber

Block or report user

Report or block galdolber

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
View upload to memory
(defn file-input [{:keys [id doc multiple on-change hide-msg
preview directory on-raw-change] :as attrs}]
[error {:errors (get (:bouncer.core/errors @doc) id) :hide-msg hide-msg}
[:div.flex.flex1.flex-column {:style {:display "inline-block"}}
(when (and preview (get @doc id))
[preview (get @doc id)])
[:div [:b (if multiple
(apply str (interpose ", " (map :name (id @doc))))
(:name (id @doc)))]]
(let [attrs (merge
View unicode.cljs
(ns api.unicode
(:refer-clojure :exclude [count seq subs]))
(def reg (if (exists? js/window)
(js* "/(\\P{Mark}\\p{Mark}*)/u")
(.build (js/require "xregexp") "(\\P{Mark}\\p{Mark}*)" "A")))
(defn seq [txt] (when txt (map first (re-seq reg txt))))
(defn count [txt] (cljs.core/count (seq txt)))
View paginas.js
biz = document.getElementsByClassName("business");
ret = [];
for(n=0;n<biz.length; n++) {
b = biz[n];
cbox = false;
try {b.children[2].children[0].children[1].children[0].className == "chatBox";}catch(e){};
try {
ret.push({"email": b.children[0].value,
"nombre": b.querySelector("*[itemprop='name']").textContent.trim(),

Keybase proof

I hereby claim:

  • I am galdolber on github.
  • I am galdolber ( on keybase.
  • I have a public key ASB1TB-KJrjkhsQCfbBKG8ZQKVZ0rIf0tNynAmAkcvrkrgo

To claim this, I am signing this object:

View freqs.clj
(defn freqs-inner [coll m]
(if (empty? coll)
(freqs-inner (rest coll)
(assoc m (first coll)
(+ 1 (or (get m (first coll)) 0))))))
(defn freqs [coll]
(freqs-inner coll {}))
You can’t perform that action at this time.