Query Git for a list of repos - change the URL username

gistfile1.txt

(ns crash-course-clojure.github
  (:require [clj-http.client :as http]
            [cheshire.core :refer [parse-string]]
            [clojure.pprint :refer [pprint]]))


(defn query-github
  "Run an arbitrary query agains Github's API."
  [query]
  (parse-string (:body (http/get "https://api.github.com/users/funkotron/repos"
                                 {:query-params {:q query}}))
                true))

(defn myrepos
  []
  (query-github nil))

(defn lang-count
  [lang]
  (count (filter #(= (:language %) lang) (myrepos))))

(print (lang-count "Python"))
(print (lang-count "Clojure"))