lygaret

(ns my.env
  (:require [clojure.edn :as edn]))

(defn- get-resource [path]
  (let [classloader (java.lang.ClassLoader/getSystemClassLoader)]
    (.getResource classloader path)))

(defn- read-config-file []
  (let [url (get-resource "config.edn")]
    (slurp url)))

lygaret

#!/usr/bin/env python
import os
import sys
from os.path import join

expectedFiles = []
actualFiles = []
returnValue = 0

expectedFolder = sys.argv[1]

lygaret

(ns rpcmacro
  (:import [java.net URL])
  (:import [org.apache.xmlrpc XmlRpcException])
  (:import [org.apache.xmlrpc.client XmlRpcClient XmlRpcClientConfigImpl XmlRpcCommonsTransportFactory XmlRpcSunHttpTransport XmlRpcSunHttpTransportFactory])
  (:import [org.apache.commons.httpclient HttpClient HttpState])
  (:use [clojure.contrib.pprint]))

(defn mk-client [url]
  (let [config (XmlRpcClientConfigImpl.)
        client (XmlRpcClient.)

lygaret

" Name:    vimproject.vim
" Version: 0.1
" Author:  Jon Raphaelson
" Summary: Loads a project specific vimrc when starting vim inside that
"          project's directory tree.
" Licence: This program is free software; you can redistribute it and/or
"          modify it under the terms of the GNU General Public License.
"          See http://www.gnu.org/copyleft/gpl.txt
" Section: Documentation {{{1
" Description:

lygaret

#!/usr/bin/env python 

# Watch and rank links coming from twitter's public timeline. 
# Currently this doesn't really work all that well, as we can only get 20 
# tweets a minute, but it's an idea.

# Requires the following non-standard python libs: (install with easy_install)
# * simplejson
# * functional
# * sqlalchemy

lygaret

(ns typoet.graphix
  (:import [javax.swing JFrame])
  (:import [java.awt Dimension Canvas])
  (:import [java.awt.event WindowAdapter KeyAdapter MouseAdapter MouseMotionAdapter])
  (:use [clojure.contrib.seq-utils]))

(defstruct window :height :width :title :frame :canvas :handlers)

(defn- get-handlers
  [window key]

lygaret

package video;

import java.awt.Image;
import java.awt.image.BufferedImage;
import java.awt.image.DataBuffer;
import java.awt.image.WritableRaster;
import quicktime.QTRuntimeException;
import quicktime.QTRuntimeHandler;
import quicktime.QTSession;
import quicktime.qd.PixMap;

lygaret

We couldn’t find that file to show.

lygaret

;; https://soundcloud.com/jonathan-raphaelson/overtone-experiment-1

(ns overtonetute.core
  [:use [overtone.live]])

(use 'overtone.inst.drum)

(definst swave [freq 440 attack 0.001 sustain 0.4 release 0.1 vol 0.005]
  (lpf (* (env-gen (env-lin attack sustain release) 1 1 0 1)
          (sin-osc freq)

lygaret

#!/bin/env ruby

def octet?(str)
  (0...256) === str.to_i
end

def octets(str, current = [], output = [])

  # bail if there's nothing left to get
  if str.nil? || str.empty?