Skip to content

Instantly share code, notes, and snippets.

@bmastenbrook
bmastenbrook / pool_import.sh
Created July 5, 2019 02:05
zed script to load keys on pool import
#!/bin/sh
#
# Log the zevent via syslog.
#
# OS X notification script.
function notify {
sudo -u "$(stat -f '%Su' /dev/console)" /usr/bin/osascript -e 'display notification "'"$1"'" with title "'"$2"'"'
}
@bmastenbrook
bmastenbrook / macromacromacro.rkt
Created August 23, 2016 21:09
I heard you like macros
#lang racket
(require (for-syntax racket))
(require (for-syntax racket/stxparam))
(begin-for-syntax
(define-syntax-parameter macro-stx (lambda (stx) (raise-syntax-error #f "use of macro-stx outside of macro" stx))))
(define-syntax macro
(syntax-rules ()
(defvar my-emacs--font-size 12)
(defun my-emacs-font ()
(format "-*-Ubuntu Mono-normal-normal-normal-*-%d-*-*-*-m-0-iso10646-1" my-emacs--font-size))
(add-to-list 'default-frame-alist `(font . ,(my-emacs-font)))
(defun font-bigger (size)
(interactive "p")
(if (eql size 1) (setq size (+ my-emacs--font-size 2)))

Keybase proof

I hereby claim:

  • I am bmastenbrook on github.
  • I am bmastenbrook (https://keybase.io/bmastenbrook) on keybase.
  • I have a public key whose fingerprint is 915E AFE2 7C6A FA8B 3373 7443 69D7 4038 B48A CB71

To claim this, I am signing this object: