methylene

(def murmur
  (let [m (com.google.common.hash.Hashing/murmur3_128)]
    (fn ^Long [^String s]
      (-> (doto (.newHasher m)
            (.putString s com.google.common.base.Charsets/UTF_8))
          (.hash)
          (.asLong)))))

idleberg

This script scans your Dropbox (or any given folder) for folders stored in the ignore array and excludes them from syncing. Makes use of the official Dropbox CLI

I'm a beginner at bash, so all improvements are welcome!

#!/bin/bash

set -e

# SETTINGS

qerub

(ns fancy-defn
  (:require [schema.core         :as s]
            [clojure.core.typed  :as t]
            [circle.schema-typer :as st]))

;; Schemas created with s/defn end up using this.
(defmethod st/convert schema.core.One [schema]
  (assert (= false (:optional? schema))) ;; No support for optional arguments yet.
  (st/convert (:schema schema)))

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

danidiaz

import Data.Text
import Data.Aeson
import Data.Aeson.Lens (_Value,_String)
import Data.Foldable (toList)
import Data.Traversable (traverse)

import qualified Data.HashMap.Strict as HM
import qualified Data.Vector as V

import Control.Applicative

bmhatfield

# If you use bash, this technique isn't really zsh specific. Adapt as needed.
source ~/keychain-environment-variables.sh

# AWS configuration example, after doing:
# $  set-keychain-environment-variable AWS_ACCESS_KEY_ID
#       provide: "AKIAYOURACCESSKEY"
# $  set-keychain-environment-variable AWS_SECRET_ACCESS_KEY
#       provide: "j1/yoursupersecret/password"
export AWS_ACCESS_KEY_ID=$(keychain-environment-variable AWS_ACCESS_KEY_ID);
export AWS_SECRET_ACCESS_KEY=$(keychain-environment-variable AWS_SECRET_ACCESS_KEY);

yannvanhalewyn

(set-env!
  :target-path "target"
  :source-paths #{"src"}
  :dependencies '[[org.clojure/clojure "1.9.0-RC1"]
                  [org.clojure/clojurescript "1.9.946"]
                  [figwheel-sidecar "0.5.14"]])

(require '[figwheel-sidecar.repl-api :as ra])

(deftask cljs-repl []

jeroenvandijk

1. Download rebl from http://rebl.cognitect.com/download.html
2. Move jar in zipfile to the com.cognitect/rebl :local/root property defined in the deps.edn
3. Run boot rebl

wavejumper

React Native + macOS + Clojurescript

Project Catalyst

Since the recent release of Catalina, macOS has shipped with the ability to allow iOS/iPAD apps to run on macOS without any modification via a featureset known as Project Catalyst.

This is exciting, as writing React Native + Clojurescript apps as a target for the desktop is much more compelling than a pure Electron app (imo).

jackrusher

;; Uses https://github.com/borkdude/jet

;; On OSX, install jet with:

;; brew install borkdude/brew/jet

;; I invoke this with M-x, you might want to bind it to a key
(defun json->edn ()
  (interactive)
  (shell-command-on-region (region-beginning)