Skip to content

Instantly share code, notes, and snippets.

View arohner's full-sized avatar

Allen Rohner arohner

View GitHub Profile
Building dependency tree...
Reading state information...
Reading extended state information...
Initializing package states...
INFO [2011-10-05 15:35:35,345] pool-2-thread-2 - pallet.execute - Output: 107.20.83.85
The following NEW packages will be installed:
avahi-daemon{a} emacsen-common{a} git{a} git-core git-email git-man{a}
gsfonts{a} gsfonts-x11{a} java-common{a} libasound2{a}
libauthen-sasl-perl{a} libavahi-common-data{a} libavahi-common3{a}
libavahi-core7{a} libdaemon0{a} libdigest-hmac-perl{a}
@arohner
arohner / gist:1296471
Created October 18, 2011 19:38
exception starting new nodes
0: com.jcraft.jsch.Session.connect(Session.java:461)
1: com.jcraft.jsch.Session.connect(Session.java:154)
2: sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
3: sun.reflect.NativeMethodAccessorImpl.invoke(NativeMethodAccessorImpl.java:39)
4: sun.reflect.DelegatingMethodAccessorImpl.invoke(DelegatingMethodAccessorImpl.java:25)
5: java.lang.reflect.Method.invoke(Method.java:597)
6: clojure.lang.Reflector.invokeMatchingMethod(Reflector.java:90)
7: clojure.lang.Reflector.invokeNoArgInstanceMember(Reflector.java:265)
8: clj_ssh.ssh$connect.invoke(ssh.clj:261)
@arohner
arohner / gist:1296509
Created October 18, 2011 19:56
node startup log
INFO [2011-10-18 14:53:57,803] pool-2-thread-3 - pallet.compute.jclouds - options {:image-id "us-east-1/ami-06ad526f", :location-id "us-east-1", :os-family :ubuntu, :hardware-id "m1.small", :security-groups ["www" "allow-DB"]}
DEBUG [2011-10-18 14:53:57,803] pool-2-thread-3 - jclouds.compute - >> searching params([biggest=false, fastest=false, imageName=null, imageDescription=null, imageId=us-east-1/ami-06ad526f, imagePredicate=null, imageVersion=null, location=[id=us-east-1, scope=REGION, description=us-east-1, parent=aws-ec2, iso3166Codes=[US-VA], metadata={}], minCores=0.0, minRam=0, osFamily=ubuntu, osName=null, osDescription=null, osVersion=null, osArch=null, os64Bit=null, hardwareId=m1.small])
DEBUG [2011-10-18 14:53:57,809] pool-2-thread-3 - jclouds.compute - << matched hardware(m1.small)
DEBUG [2011-10-18 14:53:57,809] pool-2-thread-3 - jclouds.compute - << matched image(us-east-1/ami-06ad526f)
DEBUG [2011-10-18 14:53:57,809] pool-2-thread-3 - jclouds.compute - >> running 1 node group(circle) lo
@arohner
arohner / gist:1725268
Created February 2, 2012 19:30
rake assets precompile exception in jruby 1.6.6
ubuntu@domU-12-31-39-0A-0D-02:~/CircleCI-181$ rvm jruby-1.6.6@circle exec rake assets:precompile
/home/ubuntu/.rvm/rubies/jruby-1.6.6/bin/jruby /home/ubuntu/.rvm/gems/jruby-1.6.6@circle/bin/rake assets:precompile:all RAILS_ENV=production RAILS_GROUPS=assets
rake aborted!
can't convert Encoding into String
(in /home/ubuntu/.rvm/gems/jruby-1.6.6@circle/gems/haml_coffee_assets-0.6.0/vendor/assets/javascripts/hamlcoffee.js.coffee.erb)
Tasks: TOP => assets:precompile:primary
(See full trace by running task with --trace)
rake aborted!
Command failed with status (1): [/home/ubuntu/.rvm/rubies/jruby-1.6.6/bin/j...]
@arohner
arohner / gist:2151753
Created March 21, 2012 19:31
emacs brew failure
$ brew install https://gist.github.com/raw/1946398/e7bbb52a4fe3ae0060e65df3d4a7462730ddc822/emacs.rb --force --HEAD --cocoa --use-git-head
######################################################################## 100.0%
Warning: It appears you have MacPorts or Fink installed.
Software installed with other package managers causes known problems for
Homebrew. If a formula fails to build, uninstall MacPorts/Fink and try again.
==> Cloning git://git.sv.gnu.org/emacs.git
Updating /Library/Caches/Homebrew/emacs--git
==> Downloading patches
######################################################################## 100.0%
==> Patching
@arohner
arohner / gist:2933587
Created June 14, 2012 23:12
ree-1.8.7-2010.02 compile file
src/internal_logging.cc:56:41: warning: ignoring return value of ‘ssize_t write(int, const void*, size_t)’, declared with attribute warn_unused_result [-Wunused-result]
g++ -DHAVE_CONFIG_H -I. -I. -I./src -I./src -DNO_TCMALLOC_SAMPLES -DNO_HEAP_CHECK -pthread -DNDEBUG -Wall -Wwrite-strings -Woverloaded-virtual -Wno-sign-compare -DNO_FRAME_POINTER -fno-exceptions -g -O2 -c src/internal_logging.cc -o libtcmalloc_minimal_internal_la-internal_logging.o >/dev/null 2>&1
/bin/bash ./libtool --tag=CXX --mode=compile g++ -DHAVE_CONFIG_H -I. -I. -I./src -I./src -DNO_TCMALLOC_SAMPLES -DNO_HEAP_CHECK -pthread -DNDEBUG -Wall -Wwrite-strings -Woverloaded-virtual -Wno-sign-compare -DNO_FRAME_POINTER -fno-exceptions -g -O2 -c -o libtcmalloc_minimal_internal_la-system-alloc.lo `test -f 'src/system-alloc.cc' || echo './'`src/system-alloc.cc
g++ -DHAVE_CONFIG_H -I. -I. -I./src -I./src -DNO_TCMALLOC_SAMPLES -DNO_HEAP_CHECK -pthread -DNDEBUG -Wall -Wwrite-strings -Woverloaded-virtual -Wno-sign-compare -DNO_FRAME_POINTER -fn
@arohner
arohner / gist:3357459
Created August 15, 2012 07:54
trouble setting timezone in ubuntu 12.04
root@box16:~# cat /etc/timezone
Etc/UTC
root@box16:~# echo Americas/Los_Angeles | sudo tee /etc/timezone
Americas/Los_Angeles
root@box16:~# cat /etc/timezone
Americas/Los_Angeles
root@box16:~# sudo dpkg-reconfigure --frontend noninteractive tzdata
Current default time zone: 'Etc/UTC'
@arohner
arohner / gist:3863185
Created October 10, 2012 04:34
macro generating macro
(defmacro def-with-disable-macro
"Generates a pair of macros, with-enable-foo and with-disable-foo, which use with-redefs to replace foo with (constantly nil), or restore it."
[v short-name]
(let [disable-name (symbol (format "with-disable-%s" short-name))
enable-name (symbol (format "with-enable-%s" short-name))]
`(do
(let [v# #'~v
v-name# (quote ~v)
old-value# (deref #'~v)
ns# *ns*]
@arohner
arohner / gist:4534779
Created January 15, 2013 00:08
analyze.core :refer trouble
;; File 1
(ns foo.bar
;; any :use or :refer is acceptable here, as long as the refer'd fn is not present in the user namespace (or wherever analyze is run from)
(:require [clojure.set :refer (intersection)]))
(defn foo [x y]
(intersection x y))
;; at the repl
(defn resolve-map-fn
"given a record type, resolve and return it's map->Foo fn"
[record-class]
(let [simple-name (.getSimpleName record-class)
full-name (.getName record-class)
[_ the-ns] (re-find (re (<< "(.*)\\.~{simple-name}")) full-name)]
(when the-ns
(ns-resolve (find-ns (symbol the-ns)) (symbol (<< "map->~{simple-name}"))))))