piranha

#!/bin/sh

if [ -z "$1" ]; then
    echo "Usage: $0 <path-to-wallpaper>"
    exit 1
fi

realpath() {
    [[ $1 = /* ]] && echo "$1" || echo "$PWD/${1#./}"
}

piranha

;; extend honeysql

(defmethod honeyhelpers/build-clause :returning [ _ m cols]
  (assoc m :returning (honeyhelpers/collify cols)))

(defmethod honeyfmt/format-clause :returning [[_ cols] _]
  (str "RETURNING " (honeyfmt/comma-join (map honeyfmt/to-sql cols))))

(extend-protocol honeyfmt/ToSql
  clojure.lang.Sequential

piranha

<?xml version="1.0"?>

<!--
Convert podcast RSS to commands for curl.

Originally from bashpodder, modified by Alexander Solovyov.

Usage:
    xsltproc podcast2wget.xsl path/to/podcast.rss
OR

piranha

(ns mailers.main
  (:gen-class)
  (:require [com.stuartsierra.component :as c]
            [aleph.http                 :as aleph]
            [manifold.stream            :as mani]
            [ring.util.response         :as response]
            [ring.middleware.file-info  :only [wrap-file-info]]
            [ring.middleware.resource   :refer [wrap-resource]]))

piranha

Keybase proof

I hereby claim:

• I am piranha on github.
• I am asolovyov (https://keybase.io/asolovyov) on keybase.
• I have a public key whose fingerprint is 1F63 22C2 2BAE B0D4 18C1 4477 AB09 CA13 33A4 4CB6

To claim this, I am signing this object:

piranha

#!/usr/bin/env python
# -*- mode: python, coding: utf-8 -*-
#
# This incredible piece of code makes git a bit Polish, a bit Western Ukrainian,
# пше прошу пана
# Joke is based on fact that 'git' is 'пше' in qwerty/йцукен layouts
#
# (c) 2013 Alexander Solovyov under terms of WTFPL

import sys

piranha

/*
* Anchorify without jQuery
* Rewritten from https://github.com/willdurand/anchorify.js/
*/

var anchorify = (function() {
    var specialCharsRe = /[ ;,.'?!_]/g;

    function generateId(text) {
        return text

piranha

function S4() {
    return (((1 + Math.random()) * 0x10000) | 0).toString(16).substring(1);
}
  
function UUID(short) {
    if (short) {
        return S4() + S4();
    }
    return S4() + S4() + "-" + S4() + "-" + S4() + "-" + S4() + "-" + S4() + S4() + S4();
}

piranha

#!/bin/sh

current_branch=$(git symbolic-ref HEAD | awk -F / '{print $3}')
if [ "$current_branch" != "master" ]; then
    echo "WARNING: You are on branch $current_branch, NOT master."
fi

echo "Fetching merged branches..."
git remote prune origin
remote_branches=$(git branch -r --merged | grep -v '/master$' | grep -v "/$current_branch$")

piranha

#!/usr/bin/env node

// (c) 2012-2013 Instant Communication Bhd, under terms of ISC License.
//
// Process index.html to add md5ized path mapping for RequireJS.
//
// Needs empty CacheBust variable to be defined (see replacement logic), which
// afterwards should be used in `require.config({paths: CacheBust});` call.