Skip to content

Instantly share code, notes, and snippets.

@Yasushi
Created September 25, 2017 08:39
Show Gist options
  • Save Yasushi/0c9fc8fea212aca7da45557d11b410df to your computer and use it in GitHub Desktop.
Save Yasushi/0c9fc8fea212aca7da45557d11b410df to your computer and use it in GitHub Desktop.
print available fonts clojure
(import java.awt.GraphicsEnvironment)
(def ge (GraphicsEnvironment/getLocalGraphicsEnvironment))
;;(def fs (.getAllFonts ge))
;;(dorun (->> fs (map #(.getName %)) sort (map println)))
(dorun (->> ge .getAvailableFontFamilyNames sort (map println)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment