<commit_before>(ns overtone.libs.app-icon
  (:use [clojure.java.io]
        [overtone.helpers.system :only [get-os]])
  (:import [com.apple.eawt.Application]
           [java.awt.Toolkit]))

(defn- set-osx-icon
  [icon]
  (try
    (.setDockIconImage (com.apple.eawt.Application/getApplication) icon)
    (catch Exception e
      false))
  true)

(defn- setup-icon
  []
  (let [icon-url (clojure.java.io/resource "overtone-logo.png")
        icon     (.createImage (java.awt.Toolkit/getDefaultToolkit) icon-url)]
    (cond
      (= :mac (get-os)) (set-osx-icon icon))))

(defonce __INIT-ICON__
  (setup-icon))<commit_msg>use mac-os? helper fn<commit_after>(ns overtone.libs.app-icon
  (:use [clojure.java.io]
        [overtone.helpers.system :only [mac-os?]])
  (:import [com.apple.eawt.Application]
           [java.awt.Toolkit]))

(defn- set-osx-icon
  [icon]
  (try
    (.setDockIconImage (com.apple.eawt.Application/getApplication) icon)
    (catch Exception e
      false))
  true)

(defn- setup-icon
  []
  (let [icon-url (clojure.java.io/resource "overtone-logo.png")
        icon     (.createImage (java.awt.Toolkit/getDefaultToolkit) icon-url)]
    (cond
      (mac-os?) (set-osx-icon icon))))

(defonce __INIT-ICON__
  (setup-icon))
{'fraction_non_alphanumeric': 0.16599516518936341, 'fraction_numerical': 0.0, 'mean_word_length': 2.9935691318327975, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '4416018', 'n_tokens_mistral': 482, 'n_tokens_neox': 471, 'n_words': 81}