escherize

(ns src.dev.nocommit.malli-match
  (:require
   [malli.core :as mc]
   [clojure.set :as set]
   [clojure.string :as str]
   [clojure.walk :as walk]))

(defn underive-children [tag]
  "Remove all children of the given tag."
  (let [children (descendants tag)]

escherize

brew install --cask google-chrome zoom spotify vlc libreoffice iterm2 visual-studio-code && \
brew install git curl htop zsh-autosuggestions neofetch && \
RUNZSH=no KEEP_ZSHRC=yes sh -c "$(curl -fsSL https://raw.githubusercontent.com/ohmyzsh/ohmyzsh/master/tools/install.sh)"

escherize

env MB_FUZZ=1 yarn test-unit frontend/src/metabase/querying/expressions/fuzz.compiler.unit.spec.ts
yarn run v1.22.22
warning ../package.json: No license field
$ yarn build:cljs && jest --maxWorkers=4 frontend/src/metabase/querying/expressions/fuzz.compiler.unit.spec.ts
warning ../package.json: No license field
$ yarn && yarn build-pure:cljs
warning ../package.json: No license field
$ echo $npm_execpath | grep -q yarn || echo '\033[0;33mSorry, npm is not supported. Please use Yarn (https://yarnpkg.com/).\033[0m'
[1/5] 🔍  Validating package.json...
[2/5] 🔍  Resolving packages...

escherize

(ns mage.color
  (:require
   [clojure.string :as str]
   [clojure.walk :as w]))

(def ^:dynamic *disable-colors*
  "If set to true, all color functions will return the input string as is."
  false)

(def ^:private reset

escherize

// ==UserScript==
// @name         GitHub Rerun Failed Jobs (Manual Trigger + Watcher) @escherize
// @namespace    http://tampermonkey.net/
// @version      0.7
// @description  Manually trigger a watcher to auto re-run failed GitHub Actions jobs
// @match        https://github.com/*/*/actions/runs/**
// @grant        none
// ==/UserScript==

(function () {

escherize

key,value
T_z91R4pacr4kSSydTsXo,41wkQWuMn5EBP6k6hWhKB
JArUob2NhnNa-4Jv9_bRy,C4Z-dJvHread0V5c8N7hg
KfzzjB8rw7cLLOuvVxHzX,Hspx2RfhJaiHxBQlGHZuE
j56IhWzlfqt09KgDeTeuD,rN23PO0V7XzT1_l68Gzsw
0GQKgaGekPIycszgx-nZ-,-rHxNeFn0lG_6M5UDL50F
yDJ5XrWefj9cL5d_t5mc3,R2DrTvbQNpW_Ws_mUQRfA
T5RmeXxDNbUq7pQRSbm4Z,1zx-2ZnIbu_QBw6eIo9y8
WvELUjxO-rSMBe7nTWXUX,_TFhw1iLSj_xzfNnpZ63z
eFB8Dk-5wDY1OWZzJk2NS,6KszXL2RTn-MjwE4T28EX

escherize

(ns cycloj.core
  (:require [clojure.walk :as walk]
            [clojure.repl :as repl]
            [clojure.edn :as edn]
            [clojure.string :as str]))

(defn r-rresolve [s]
  (try (resolve s)
       (catch Exception e (try (requiring-resolve s)
                               (catch Exception e nil)))))

escherize

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


;; Execution requires a set of operations, a starting state, and a script.
;;
;; Each operation from the script is applied to the state, and returns a map where the keys are effects (fxs), and the values are the single args to the fx handlers.
;; the state is updated by the :value fx handle. Also, each operation's result is added to the output.

escherize

;; (record!)
(defn check-sample [sample]
  (let [{:keys [api-perms data-perms]} sample]
    [[::data-perms (fmt data-perms)]
     [::data->api (fmt (:groups (data-perms.graph/db-graph->api-graph data-perms)))]
     [::api (fmt (:groups api-perms))]
     [::equal? (= (:groups (data-perms.graph/db-graph->api-graph data-perms))
                  (:groups api-perms))]]))

(mapv check-sample (samples))

escherize

(ns dev.nocommit.massive-perm-graph
  (:require [clojure.string :as str]
            [criterium.core :as criterium]
            [metabase.models.permissions :as perms]
            [metabase.models.permissions-group :as perms-group]
            [metabase.test :as mt]
            [metabase.util.log :as log]
            [toucan2.core :as t2]))

(comment