favila

(defn tx-pipeline-inorder
  "Transact transactions in core.async channel `from-ch` against datomic connection `conn` with a pipeline depth of `n`.
  
  Returns a map with keys `:stop!` and `:result`. `:stop!` is a no-arg function you can call to immediately
  cease sending transactions (already sent transactions cannot be stopped). `:result` is a promise channel
  returning a variant of the result of the tx-pipelining after from-ch is closed and drained, or
  :stop! is called and all send transaction futures are deref-ed, or a transaction produces an exception.
  
  The variant returned from the :result channel may be one of:
  

rauhs

(defmacro afor
  "Like for but eagerly builds a JS array.
  Usually for react consumption."
  [[item coll] & body]
  `(reduce (fn [neue# ~item]
              (.push neue# (do ~@body))
              neue#)
            (cljs.core/array) ~coll))

(defmacro arfor

ryu1kn

# How to encrypt/decrypt your text/blob secret with AWS KMS with AWS cli

KEY_ID=alias/my-key
SECRET_BLOB_PATH=fileb://my-secret-blob
SECRET_TEXT="my secret text"

ENCRYPTED_SECRET_AS_BLOB=encrypted_secret_blob
DECRYPTED_SECRET_AS_BLOB=decrypted_secret_blob  # Result of decrypt-blob target

encrypt-text:

favila

(require '[datomic.api :as d])

(defn entity-pull
  "Like pull, but returns values consistent with d/entity, i.e.,
  entities with :db/ident are represented as keywords and sets are
  used instead of vectors."
  [db pat eid]
  (->> (d/pull db pat eid)
       (clojure.walk/prewalk
         (fn [x]

aengelberg

(ns hello-manifold.core
  (:require
    [aleph.http :as http]
    [byte-streams :as bs]
    [cheshire.core :as json]
    [clojure.string :as str]
    [manifold.deferred :as d]
    [manifold.executor :as e]
    [manifold.stream :as s]))

scottopell

exFAT support on macOS seems to have some bugs because my external drives with exFAT formatting will randomly get corrupted.

If Disk Utility is unable to repair, consider trying this:

1. In Disk Utility, ensure that the drive is not mounted, eject it if it is mounted.
2. Use diskutil list to find the right drive id.
3. You want the id under the IDENTIFIER column, it should look like disk1s1
4. Run sudo fsck_exfat -d <id from above>. eg sudo fsck_exfat -d disk1s3
5. -d is debug so you'll see all your files output as they're processed.

rauhs

(defmacro datomic-fn
  "Creates a datomic function given (fn [db e a ...] code...)"
  [[_ args & body]]
  `(d/function '{:lang "clojure"
                 :params ~args
                 :code (do ~@body)}))

(defn trinity-new
  "1. If a is a ref:
  Ensures that

davidowens

import gulp from 'gulp';
import moment from 'moment-timezone/moment-timezone';
import 'moment-timezone/moment-timezone-utils';
import fs from 'fs';
import config from '../../config';

const inputFile = 'node_modules/moment-timezone/data/unpacked/latest.json';
const outputFile = 'app/lib/moment-timezone-data.json';
const start = 2014;
const end = moment().add(5, 'years').year();

gbaman

Setting up Pi Zero OTG - The quick way (No USB keyboard, mouse, HDMI monitor needed)

More details - http://blog.gbaman.info/?p=791

For this method, alongside your Pi Zero, MicroUSB cable and MicroSD card, only an additional computer is required, which can be running Windows (with Bonjour, iTunes or Quicktime installed), Mac OS or Linux (with Avahi Daemon installed, for example Ubuntu has it built in).
1. Flash Raspbian Jessie full or Raspbian Jessie Lite onto the SD card.
2. Once Raspbian is flashed, open up the boot partition (in Windows Explorer, Finder etc) and add to the bottom of the config.txt file dtoverlay=dwc2 on a new line, then save the file.
3. If using a recent release of Jessie (Dec 2016 onwards), then create a new file simply called ssh in the SD card as well. By default SSH i

favila

(def tx-fns
  [{:db/ident :db.fn/reset-attribute-values
    :db/doc "Transaction function which accepts an entity identifier, attribute identifier
 and set of values and expands to any additions and retractions necessary to
 make the final post-transaction value of the attribute match the provided
 values. Attribute values must be scalars.
 
 If multiple values are provided on a cardinality-one attribute you will get a
 datom conflict exception at transaction time."
    :db/fn    (d/function