Skip to content

Instantly share code, notes, and snippets.

View citizen428's full-sized avatar

Michael Kohl citizen428

255 followers · 67 following
View GitHub Profile
@citizen428
citizen428 / watched_repos.rb
Created June 9, 2010 22:04
require 'httparty'
class GitHub
include HTTParty
base_uri 'http://github.com/api/v2/yaml'
API_METHODS = {
:watched => '/repos/watched/' }
class << self
@citizen428
citizen428 / gist:454018
Created June 26, 2010 12:23
# Get the official Emacs repo:
git clone http://repo.or.cz/r/emacs.git/
# Get the fullscreen patch
git remote add typester git://github.com/typester/emacs.git
git fetch typester
# Create a patch and apply to HEAD
# I had merge conflicts when rebasing and
# build failures for origin/emacs-23
@citizen428
citizen428 / gist:465950
Created July 6, 2010 21:32
;;; Ruby/Rails development
;; RVM support
;; Ruby Version Manager
(require 'rvm)
(rvm-use-default)
;; automatically add 'end' after class, module, def etc.
;; automatically pair braces, single and double quotes
(require 'ruby-electric)
@citizen428
citizen428 / gist:518090
Created August 10, 2010 21:49
(use '(incanter core charts io))
@citizen428
citizen428 / ycombinator-step1.clj
Created December 14, 2010 20:42
(ns step1)
(defn fact
[n]
(if (< n 2) 1 (* n (fact (dec n)))))
;; (fact 5) => 120
@citizen428
citizen428 / Emacs.markdown
Created January 16, 2011 00:03

Help:

C-h t Tutorial
C-h m Help for active mode
C-h k Help for key sequence
C-h f Help for function
C-h v Help for variable
C-h a Search help
C-h i Info reader

@citizen428
citizen428 / lambdaheads-20110117.markdown
Created January 17, 2011 21:44
@citizen428
citizen428 / octopress_redirects.rb
Created September 26, 2011 07:13
Given a WP XML export, this script will generate the necessary 301 redirect rules for all posts for Apache or Nginx.
require 'date'
require 'rexml/document'
include REXML
doc = Document.new(File.new(ARGV[0]))
format = ARGV[1] || "apache"
formats = {
:apache => "RewriteRule ^%s$ /%s [R=301,L]",
@citizen428
citizen428 / pow-show.rb
Created November 22, 2011 20:43
A little wrapper around Pow's HTTP requests for status.json and config.jsom
#!/usr/bin/env ruby
require 'json'
unless %w(status config).include?(ARGV[0])
puts "Usage: #{File.basename($0)} status|config"
exit 1
end
jj JSON.parse(`curl -s -H host:pow localhost/#{ARGV[0]}.json`)
@citizen428
citizen428 / map_reduce.rb
Created November 22, 2011 20:46
A snippet I used for explaining the map/reduce paradigm
>> words = "foo bar baz qux foo bar lala"
#=> "foo bar baz qux foo bar lala"
>> # map (user-supplied)
.. mapped = words.split(/ /).map { |w| [w,1] }
#=> [["foo", 1], ["bar", 1], ["baz", 1], ["qux", 1], ["foo", 1], ["bar", 1], ["lala", 1]]
>> # aggregate (built-in)
.. aggregated = mapped.group_by { |w, c| w }
#=> {"foo"=>[["foo", 1], ["foo", 1]], "bar"=>[["bar", 1], ["bar", 1]], "baz"=>[["baz", 1]], "qux"=>[["qux", 1]], "lala"=>[["lala", 1]]}
>> # reduce (user-supplied)
>> aggregated.each_with_object({}) { |(k, v), h| h[k] = v.map(&:last).inject(:+) }