madvas

(defn partial-right
  "Takes a function f and fewer than the normal arguments to f, and
 returns a fn that takes a variable number of additional args. When
 called, the returned function calls f with additional args + args."
  ([f] f)
  ([f arg1]
   (fn [& args] (apply f (concat args [arg1]))))
  ([f arg1 arg2]
   (fn [& args] (apply f (concat args [arg1 arg2]))))
  ([f arg1 arg2 arg3]

dhumbert

(require '[clojure.string :as string])
(defn readable-duration [duration-seconds]
  (let [int-seconds (int duration-seconds)
        days        (quot int-seconds 86400)
        days-r      (rem int-seconds 86400)
        hours       (quot days-r 3600)
        hours-r     (rem days-r 3600)
        minutes     (quot hours-r 60)
        seconds     (rem hours-r 60)]
    (string/join " "

leblowl

(def db (atom nil))

(defn error [e]
  (.error js/console "An IndexedDB error has occured!" e))

(defn new [cb]
  (let [version 1
        request (.open js/indexedDB "lokate" version)]
    (set! (.-onupgradeneeded request) (fn [e]
                                        (reset! db (.. e -target -result))

city41

This is the example that comes with the reagent template converted to use HTML5 based history. This means there are no # in the urls.

I just got this working, so there might be better approaches

The changes are

• use goog.history.Html5history instead of goog.History
• listen to clicks on the page, extract the path from them, and push them onto the history
• listen to history changes, and have secretary do its thing in response

hirobert

1) Log in to aws console.


2) Click cloudfront


3) Click behaviors


4) Select pattern and edit

pleasetrythisathome

(def inputs [{:korks :email}
             {:korks [:name :first]}
             {:korks [:name :last]}])

(defn form [app owner]
  (reify
    om/IInitState
    (init-state [this]
      (reduce (fn [state {:keys [korks]}]
                (assoc-in state korks nil))

satyadeepk

#!/bin/sh
# Restartes the parse log if it crashes
# stdbuf flushes the Parse log buffer so they come in real time
until stdbuf -oL /usr/local/bin/parse log -f > info.log; do
    echo "Parse log  crashed with exit code $?.  Respawning.." >&2
    sleep 1
done

pbojinov

Two way iframe communication

The main difference between the two pages is the method of sending messages. Recieving messages is the same in both.

Parent

Send messages to iframe using iframeEl.contentWindow.postMessage Recieve messages using window.addEventListener('message')

iframe

clojens

(def ptrn
  {
   :a {:pattern #"a(?!b)"
       :purpose "Only allow a if it is not preceded by a 'b' (negative lookahead)"
       :samples ["acdefg" ; ok
                 "abcdef" ; nil
                 ]}
   
   :b {:pattern #"(?i)(<title.*?>)(.+?)(</title>)"

metaist

.container-fixed {
  bottom: 0;
  position: fixed;
  left: 0;
  right: 0;
  top: 0;
}

.container-fixed .col {
  height: 100%;