Skip to content

Instantly share code, notes, and snippets.

View grzm's full-sized avatar

Michael Glaesemann grzm

41 followers · 0 following
View GitHub Profile
@grzm
grzm / JavaNetHttp.java
Created November 16, 2021 03:22
jdk.httpclient.allowRestrictedHeaders vs graalvm
import java.net.http.HttpRequest;
import java.net.URI;
import static java.util.Optional.ofNullable;
public class JavaNetHttp {
public static void main(String[] args) {
System.out.printf("jdk.httpclient.allowRestrictedHeaders %s\n",
ofNullable(System.getProperty("jdk.httpclient.allowRestrictedHeaders"))
.orElse("Not found"));
try {
@grzm
grzm / mock_remote_x.cljs
Last active January 6, 2021 03:46
Pathom defresolver explorations
(ns com.grzm.mum.viz.client.app.mock-remote-x
(:require
[cljs.core.async :as async]
[com.wsscode.pathom.connect :as pc :refer [defresolver]]
[com.wsscode.pathom.core :as p]))
(defonce tasks
[{:mum.task/id "0", :mum.task/deps [{:mum.task/id "2"}]}
{:mum.task/id "1", :mum.task/deps [{:mum.task/id "3"}]}
{:mum.task/id "2"}
@grzm
grzm / 2019-10-09-clojure-mn-notes.org
Last active October 19, 2019 00:50
Unforgivably brief and embarrassingly incomplete notes/guide for ClojureMN 2019-10-09
@grzm
grzm / InstallVerticaJdbc9
Created October 12, 2018 15:32 — forked from gialnet/InstallVerticaJdbc9
Install JDBC Driver Vertica 9, No Maven repository, install locally
# Install JDBC Driver Vertica 9
# No Maven repository, install locally
mvn install:install-file -Dfile={/path_to/vertica-jdbc-9.0.1-0.jar} -DgroupId=com.vertica -DartifactId=vjdbc9 -Dversion=9.0.1 -Dpackaging=jar
@grzm
grzm / project.clj
Last active December 6, 2017 21:16
figwheel loading cljs.user in one build but not another
(defproject com.grzm/sorty.alpha "0.0.1-SNAPSHOT"
:description "Simple web-based classification app"
:url "https://github.com/grzm/sorty.alpha"
:license {:name "MIT"
:url "https://opensource.org/licenses/MIT"}
:min-lein-version "2.0.0"
:dependencies [[ch.qos.logback/logback-classic "1.1.7"
:exclusions [org.slf4j/slf4j-api]]
[com.grzm/logback-discriminator "0.1.1-SNAPSHOT"
:exclusions [ch.qos.logback/logback-classic]]
@grzm
grzm / gist:715f3d363b06740122a1e1eb38a0e2f7
Created November 17, 2017 00:22
keybase.md
### Keybase proof
I hereby claim:
* I am grzm on github.
* I am grzm (https://keybase.io/grzm) on keybase.
* I have a public key whose fingerprint is E446 68E9 A5F7 AE2E 14A9 6BE4 1C94 A5C9 A242 737A
To claim this, I am signing this object:
@grzm
grzm / core.clj
Last active June 30, 2017 14:09
Overriding generator function spec in `stest/instrument`
(ns spec-ex.core
(:require
[clojure.spec.alpha :as s]
[clojure.spec.gen.alpha :as gen]
[clojure.spec.test.alpha :as stest]))
;; [org.clojure/spec.alpha "0.1.123"]
;; The goal is to stub functions which require some kind external
;; dependency, such as a service or other I/O.
@grzm
grzm / compilation
Created September 26, 2016 23:04
om.next/cljs.spec interaction warning
λ lein cljsbuild once prod
Compiling ClojureScript...
Compiling "out/main.js" from ["src"]...
Sep 26, 2016 7:03:38 PM com.google.javascript.jscomp.LoggerErrorManager println
WARNING: /Users/grzm/Documents/dev/om-namespace/out/cljs/analyzer.js:4740: WARNING - incomplete alias created for namespace cljs.spec
var mchk = (function (){var and__6935__auto__ = cljs.spec;
^
Sep 26, 2016 7:03:38 PM com.google.javascript.jscomp.LoggerErrorManager printSummary
WARNING: 0 error(s), 1 warning(s)
@grzm
grzm / core.cljs
Created September 21, 2016 21:32
untangled-client log out/app state reset
(ns myapp.client.core
(:require
[om.next :as om]
[myapp.client.ui :as ui]
[myapp.client.ui.user :as user]
[untangled.client.core :as uc]
[untangled.client.data-fetch :as df]))
(defn on-start
[{:keys [reconciler]}]
@grzm
grzm / figwheel.clj
Last active February 22, 2016 16:41
Mixing om-next-starter with @stuartsierra's component
(require '[figwheel-sidecar.repl :as r]
'[figwheel-sidecar.repl-api :as ra]
'[com.stuartsierra.component :as component]
'[om-starter.server :as server]
'[ring.component.jetty :refer [jetty-server]])
(def figwheel-config
{:figwheel-options {}
:build-ids ["dev"]
:all-builds