Skip to content

Instantly share code, notes, and snippets.

@grav
grav / reagent-inspect.clj
Last active November 26, 2019 06:42
Wrapper component that allows you to inspect the properties of its child component, when hovered+ctrl
(defn inspect []
(let [state (r/atom nil)]
(fn [[c & args]]
(let [{:keys [hover]} @state]
[:div {:on-mouse-over #(do
(swap! state assoc :hover (.getModifierState % "Control")))
:on-mouse-out #(swap! state assoc :hover false)
:style {:display :inline-block
:width "100%"
:height "100%"
@grav
grav / totalIndexedDbSize.js
Created January 7, 2020 14:05
Measure total size of all indexeddb objects
// forked from
// https://github.com/jonnysmith1981/getIndexedDbSize
function showIndexedDbSize(dbname) {
"use strict";
var db;
var totalSize = 0
function openDatabase(dbname) {
return new Promise(function(resolve, reject) {
@grav
grav / dropshadow.html
Last active April 2, 2020 12:07
Slow printing issue in Chromium
<html><head>
<style>
img {
filter: drop-shadow(0.1em 0.2em 0.3em)
}
</style>
</head>
<body><img src="https://www.w3schools.com/html/pic_trulli.jpg">
<img src="https://www.w3schools.com/html/img_girl.jpg">
<img src="https://www.w3schools.com/html/img_chania.jpg">
@grav
grav / dropshadow.html
Created April 2, 2020 06:52
Slow preview rendering
<html><head>
<style>
img {
filter: drop-shadow(0.1em 0.2em 0.3em)
}
</style>
</head>
<body><img src="https://www.w3schools.com/html/pic_trulli.jpg">
<img src="https://www.w3schools.com/html/img_girl.jpg">
<img src="https://www.w3schools.com/html/img_chania.jpg">

Keybase proof

I hereby claim:

  • I am grav on github.
  • I am grav (https://keybase.io/grav) on keybase.
  • I have a public key ASBpLgOF1iiKu5f1IJmjWQNyRAelF1juXqIgLEoY7wrzcgo

To claim this, I am signing this object:

<html>
<svg width="220" height="150" xmlns="http://www.w3.org/2000/svg">
<defs>
<linearGradient id="PadGradient"
x1="33%" x2="67%">
<stop offset="0%" stop-color="fuchsia"/>
<stop offset="100%" stop-color="orange"/>
</linearGradient>
<linearGradient id="ReflectGradient" spreadMethod="reflect"
x1="33%" x2="67%">
@grav
grav / caps_lock_off.c
Created May 27, 2021 15:20
Turn Caps Lock off. To
// compile: gcc -O -Wall -o caps_lock_off caps_lock_off.c -lX11
// dependencies: build-essentials, libx11-dev
// From https://askubuntu.com/a/80301/436927
#include <stdio.h>
#include <X11/X.h>
#include <X11/XKBlib.h>
int main()
{
Display *display = XOpenDisplay(NULL);
(do (println (str (char 27) "[2J")) (Thread/sleep (* 1000 (let [a 1 b 1] (+ a (rand-int (- b a)))))) (dotimes [n 80] (println "🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒🐒")))
@grav
grav / altech.md
Last active September 28, 2022 13:09
@grav
grav / miditest.clj
Created February 25, 2023 15:19
Simple Midi example for Clojure
;; Adapted from https://stackoverflow.com/a/36466737/202538
;; Run with `clj -M miditest.clj`
(ns miditest
(:import (javax.sound.midi
Synthesizer
MidiSystem
Instrument
MidiChannel
MidiUnavailableException)))