<commit_before>(ns just-married.home.gift
  (:require [just-married.home.language :refer [translate]]
            [clojure.string :as string]
            [goog.string :as gstring]))

(def LANGUAGE-TO-CURRENCY
  {:en "gbp"
   :it "euro"})

(def coordinates
  {:eur {:name "<NAME>"
         :iban "DE70100110012629402677"}

   :gbp {:name "<NAME>"
         :iban "GB19ABBY09012921859069"
         :number "21859069"
         :sort-code "09-01-29"}})

(def gift-dict
  {:en {:gift   "Your company in this special day will be the greatest gift. If you would like to contribute to our Honeymoon at the Seychelles you can do use these bank coordinates:"
        :pounds "British Pounds"
        :title  "Contribute"}

   :it {:gift   "La vostra presenza in questo giorno speciale sarà il regalo più importante.
Se vorrete contribuire al nostro viaggio di nozze alle Seychelles potrete farlo usando queste coordinate bancarie:"
        :pounds "Sterline"
        :title  "Contributo"}})

(def ^:private tr
  (partial translate gift-dict))

(defn coords-table
  [fields key]
  [:table.bank_table
   (into [:tr]
         (for [f fields]
           [:th (-> f name string/upper-case)]))

   (into [:tr]
         (for [f fields]
           [:td (-> coordinates key f)]))])

(defn gift
  []<commit_msg>english<commit_after>(ns just-married.home.gift
  (:require [just-married.home.language :refer [translate]]
            [clojure.string :as string]
            [goog.string :as gstring]))

(def LANGUAGE-TO-CURRENCY
  {:en "gbp"
   :it "euro"})

(def coordinates
  {:eur {:name "<NAME>"
         :iban "DE70100110012629402677"}

   :gbp {:name "<NAME>"
         :iban "GB19ABBY09012921859069"
         :number "21859069"
         :sort-code "09-01-29"}})

(def gift-dict
  {:en {:gift   "Your company in this special day will be the greatest gift. If you would like to contribute to our Honeymoon trip to the Seychelles you can do use these bank coordinates:"
        :pounds "British Pounds"
        :title  "Contribute"}

   :it {:gift   "La vostra presenza in questo giorno speciale sarà il regalo più importante. Se vorrete contribuire al nostro viaggio di nozze alle Seychelles potrete farlo usando queste coordinate bancarie:"
        :pounds "Sterline"
        :title  "Contributo"}})

(def ^:private tr
  (partial translate gift-dict))

(defn coords-table
  [fields key]
  [:table.bank_table
   (into [:tr]
         (for [f fields]
           [:th (-> f name string/upper-case)]))

   (into [:tr]
         (for [f fields]
           [:td (-> coordinates key f)]))])

(defn gift
  []
{'fraction_non_alphanumeric': 0.12407910042652191, 'fraction_numerical': 0.038774718883288095, 'mean_word_length': 2.7719298245614037, 'pattern_counts': {'":': 0, '<': 7, '<?xml version=': 0, '>': 11, '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': '6596351', 'n_tokens_mistral': 972, 'n_tokens_neox': 871, 'n_words': 277}