yurrriq

#!/usr/bin/env bash

# Find and delete empty directories in $1
find $1 -empty -type d -delete

yurrriq

{-# language TypeFamilies #-}
{-# language TypeOperators #-}
{-# language DeriveFunctor #-}
{-# language TypeInType #-}
{-# language UndecidableInstances #-}
{-# language ViewPatterns #-}
{-# language ConstraintKinds #-}
{-# language GADTs #-}
module TicTacToe where

yurrriq

#! /usr/bin/env bash

git --no-pager diff -w $1 | pbcopy

yurrriq

### Force English ###
defaults write org.gnucash.Gnucash AppleLanguages '(en)'
defaults write org.gnucash.Gnucash AppleLocale 'en_US'

### Revert to system settings ###
defaults delete org.gnucash.Gnucash AppleLanguages
defaults delete org.gnucash.Gnucash AppleLocale

yurrriq

;;; eio.el --- Support for creating Elisp exercises

;; Author: Jason Lewis
;; Created: 5 June 2015

;; This file is not part of GNU Emacs.

;;; Commentary:
;;
;; Provides utility functions for stubbing elisp exercises

yurrriq

import CoreGraphics

public extension CGRect {

  func subtract(_ subtrahend: CGRect, edge: CGRectEdge) -> CGRect {
    guard intersects(subtrahend) else { return self }

    let intersectSize: CGSize = intersection(subtrahend).size

    let distance: CGFloat = (edge == .minXEdge || edge == .maxXEdge)

yurrriq

#! /usr/bin/env nix-shell
#! nix-shell -i bash -p bash

deps () {
    nix-store --query --references $1
}

deriver () {
    nix-store -qd $1
}

yurrriq

#! /usr/bin/env bash

for pubkey in ~/.ssh/*.pub; do
  ssh-keygen -E md5 -lf $pubkey
end

yurrriq

#!/bin/bash

# Taken from:
# https://github.com/mmhelloworld/idris-jvm/blob/aa5049a/bin/travis_long

$* &
pidA=$!
minutes=0

while true; do sleep 60; ((minutes++)); echo -e "\033[0;32m$minutes minute(s) elapsed.\033[0m"; done &

yurrriq

#(set! paper-alist
       (cons '("my size" . (cons (* 2 8.5 in) (* 4 11 in)))
             paper-alist))
\setOption naptaker.staff-size #26
\setOption naptaker.paper-size #"my size"
\setOption naptaker.paper-orientation #'landscape