Skip to content

Instantly share code, notes, and snippets.

View woxtu's full-sized avatar

woxtu

45 followers · 2 following
View GitHub Profile
@woxtu
woxtu / gist:7045816
Created October 18, 2013 18:19
Convert image to Data URI in Rouge.
;; Rouge 0.0.14
(require "base64")
(require "mime/types")
(let [filename (nth ARGV 0)]
(let [data-type (-> filename MIME.Types/of first)
data-str (-> filename Kernel/open .read Base64/encode64)]
(.write (Kernel/open (str (File/basename filename) ".html") "wb")
(str "<!DOCTYPE html>\n" "<img src=\"data:" data-type ";base64," data-str "\" />"))))
@woxtu
woxtu / gist:6963724
Created October 13, 2013 15:46
Tweet in Rouge.
;; Rouge 0.0.14
(require "oauth")
(def *consumer-key* "YOUR CONSUMER KEY")
(def *consumer-secret* "YOUR CONSUMER SECRET")
(let [consumer-token (OAuth.Consumer. *consumer-key* *consumer-secret*
{:site "https://api.twitter.com/"})
request-token (.get_request_token consumer-token)]