Gregory Ganley gganley
gganley
/ search_result.json
Last active
July 26, 2019 22:20
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| { | |
| "time_of_search": "2019-07-26T18:18:51.245804-04:00", | |
| "query": "from:TwitterDev lang:en", | |
| "top_words": [ | |
| { | |
| "word": "a", | |
| "count": 19 | |
| }, | |
| { | |
| "word": "for", |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #!/usr/bin/env python3 | |
| import re | |
| import getopt | |
| import sys | |
| import os | |
| import requests | |
| import json | |
| def get_toggl_command(): |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (after! doom-modeline | |
| (require 'json) | |
| (require 'parse-time) | |
| (defvar doom-modeline--toggl-timer nil) | |
| (defun doom-modeline-toggl-timer () | |
| "Start/Stop the timer for github fetching." | |
| (if (timerp doom-modeline--toggl-timer) | |
| (cancel-timer doom-modeline--toggl-timer)) | |
| (setq doom-modeline--toggl-timer |
gganley
/ gh_sloc.sh
Created
February 20, 2019 19:59
Determine the SLOC for all repos for any given user
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| mkdir temp && cd temp && curl https://api.github.com/users/$1/repos | jq -r ".[] | select(.fork == false) | .name" | xargs -I{} sh -c "git clone https://github.com/$1/{} --depth 1 && cd {} && cloc . --git --sql=../test --sql-append && cd .. && rm -rf {}" |
gganley
/ auth.playground
Created
October 25, 2018 15:23
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| import Cocoa | |
| struct Auth: Codable { | |
| let email: String | |
| let pw: String | |
| } | |
| struct Confirmation: Codable { | |
| let status: Bool | |
| } |
gganley
/ datomic.clj
Created
October 12, 2016 20:06
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (require '[datomic.api :as d]) | |
| (def uri "datomic:mem://pogchamp") | |
| (d/create-database uri) | |
| (def conn (d/connect uri)) | |
| @(d/transact conn [[ | |
| {:db/id #db/id[:db.part/db] | |
| :db/ident :message/text | |
| :db/valueType :db.type/string | |
| :db/cardinality :db.cardinality/one |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (defn lookup-past-broadcasts [chan] | |
| (->> (client/get (format "https://api.twitch.tv/kraken/channels/%s/videos?limit=10000" chan) | |
| {:content-type :vnd.twitchtv.v3+json | |
| :query-params {"broadcasts" "true"}}) | |
| :body | |
| parse-string | |
| walk/keywordize-keys | |
| :videos | |
| (map (fn [x] | |
| (-> x |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (ns pogchamp.aleph | |
| (:require [aleph.tcp :as tcp] | |
| [gloss.core :as gloss] | |
| [gloss.io :as gio] | |
| [manifold.stream :as s] | |
| [manifold.deferred :as d])) | |
| (def protocol (gloss/string :utf-8 :delimiters ["\r" "\r\n"])) | |
| (defn wrap-duplex-stream |
gganley
/ org-mode-modification
Created
December 7, 2015 19:50
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (add-hook 'org-mode-hook | |
| (lambda () | |
| (local-set-key (kbd "C-x C-s") | |
| (lambda () | |
| (save-buffer) | |
| (org-latex-export-to-pdf))))) |