Skip to content

Instantly share code, notes, and snippets.

Martin Blais blais

Block or report user

Report or block blais

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
View utils.clj
;; FIXME: This is missing from the stdlib.
(defn split-extension [filename]
(let [index (.lastIndexOf filename ".")]
(list (.substring filename 0 index) (.substring filename index))))
(defn get-basename [filename]
(let [index (.lastIndexOf filename ".")]
(.substring filename 0 index)))
(defn get-extension [filename]
View gist.el
(when (not token)
(setq token (read-string "GitHub API token: "))
(github-set-config "token" token))
You can’t perform that action at this time.