cjsauer

(ns my-app.errors
  (:require [my-app.spec :as spec]
            [cljs.spec.alpha :as s]))

(def error-map
  {::spec/required "This field is required"
   ::spec/max-length "This field is too long"
   :email/regex "Invalid email address"
   :password/regex "Password must contain at least 1 letter and 1 number"
   :password/min-length "Password must be at least 8 characters in length"

cjsauer

(ns datomic-ensure
  (:require [datomic.client.api :as d]))

(defn cardinality
  "Returns the cardinality (:db.cardinality/one or
   :db.cardinality/many) of the attribute"
  [db attr]
  (->>
   (d/q '[:find ?v
          :in $ ?attr

cjsauer

#!/bin/bash
while [ $# -gt 1 ]
do
    case "$1" in
        -p)
            PROFILE_COMMAND="--profile $2"
            ;;
        -r)
            REGION=$2
            ;;

cjsauer

clj -A:cider:dev -e '(require (quote cider-nrepl.main)) (cider-nrepl.main/init ["cider.nrepl/cider-middleware" "refactor-nrepl.middleware/wrap-refactor"])'

cjsauer

namespace MyProject.Core
{
    using MyProject.Utilities;
    using NatCorderU.Core;
    using System.Collections;
    using UnityEngine;

    public class ReplayRecorder : MonoBehaviour
    {
        public int width = 960;

cjsauer

;;; Directory Local Variables
;;; For more information see (info "(emacs) Directory Variables")

((clojure-mode
  (eval define-clojure-indent
        (dom/a 1)
        (dom/abbr 1)
        (dom/address 1)
        (dom/altGlyph 1)
        (dom/altGlyphDef 1)

cjsauer