Skip to content

Instantly share code, notes, and snippets.

Joe R. Smith solussd

Block or report user

Report or block solussd

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
solussd /
Last active Sep 27, 2018
nrepl + deps.edn quickstart


  1. Add nrepl server dep to deps.edn :dev alias extra deps
org.clojure/tools.nrepl {:mvn/version "0.2.12"}
  1. create dev/user.clj containing the following:
(ns user
  (:require [ :as nrepl]))
View gist:9475415
# Setting GIT prompt
c_cyan=`tput setaf 6`
c_red=`tput setaf 1`
c_green=`tput setaf 2`
c_sgr0=`tput sgr0`
branch_color ()
if git rev-parse --git-dir >/dev/null 2>&1
View rendering snippet
(defn render-page [renderer [_ path] transmitter]
(let [parent (render/get-parent-id renderer path)
id (render/new-id! renderer path)
html (templates/add-template renderer path (:pedestal-sandbox-page templates))]
(dom/append! (dom/by-id parent) (html {:id id :message "" :blah "val"}))))
solussd / gist:1595144
Created Jan 11, 2012
why doesn't this print the result of {:tag audit-rootkey :attrs {} :content (map to-xml-struct directory-records)} to stdout?
View gist:1595144
(defn generate-file-audit-xml
"Takes a seq of DirectoryRecords that contains the file audit and outputs an XML string with a
top level element with the value of file-audit/audit-rootkey"
{:pre [(sequential? directory-records)]}
(let [out *out*]
(-> (binding [*out* out] {:tag audit-rootkey :attrs {} :content (map to-xml-struct directory-records)})
solussd / gist:1514590
Created Dec 23, 2011
why does this end in a BAD_ACCESS?
View gist:1514590
@implementation SBAppDelegate {
__weak NSNumber *aNumber;
NSNumber *anotherNumber;
- (void)applicationDidFinishLaunching:(NSNotification *)aNotification {
NSNumber *myNumber = [NSNumber numberWithInt:2];
self->anotherNumber = myNumber;
self->aNumber = myNumber;
You can’t perform that action at this time.