rotaliator

(require '[clojure.string :as str])

(defn remove-pl [s]
  (str/escape s (zipmap "ŻÓŁĆĘŚĄŹŃżółćęśąźń" "ZOLCESAZNzolcesazn")))

rotaliator

#!/usr/bin/env python
#
# Script downloads subtitles from napiprojekt
# python3 and Windows compatible
#
# based on older script
# by gim,krzynio,dosiu,hash 2oo8.
# last modified: 19-VI-2o19
# 4pc0h f0rc3
from hashlib import md5

rotaliator

(ns edn-pprint.core
  (:require
   [clojure.pprint :refer [pprint]]
   [clojure.edn :as edn]))

(pprint (edn/read-string (apply str (line-seq (java.io.BufferedReader. *in*)))))

rotaliator

(defn str->int
  ([s] (str->int s 10))
  ([s base]
   #?(:clj  (java.lang.Integer/parseInt s base)
      :cljs (js/parseInt s base))))

rotaliator

;; https://twitter.com/RobStuttaford/status/1095434901950734337

(defn copy-to-clipboard [val]
  (let [el (js/document.createElement "textarea")]
    (set! (.-value el) val)
    (.appendChild js/document.body el)
    (.select el)
    (js/document.execCommand "copy")
    (.removeChild js/document.body el)))

rotaliator

import json
from functools import wraps
from hashlib import sha1

CACHE_DIR = '_cache/'
MAX_FILENAME_LENGTH = 40

class CacheNotFound(Exception):
    pass

rotaliator

(def conn (atom nil))
(defn ensure-conn [config] (swap! conn #(or % (connect config))))

rotaliator

(ns gist.core
  (:require [clojure.string :as str])
  (:import (java.io File)
           (java.awt.image BufferedImage
                           WritableRaster)
           (javax.imageio ImageIO))
  (:gen-class))


(defn save-pixels-as-png

rotaliator

(defn lazy-file-lines [file]
  (letfn [(helper [rdr]
            (lazy-seq
             (if-let [line (.readLine rdr)]
               (cons line (helper rdr))
               (do (.close rdr) nil))))]
    (helper (clojure.java.io/reader file))))

rotaliator

(ns example.app
  (:require [reagent.core :as reagent :refer [atom]]))

(defn app []
  [:div
   [:h1 "Shadow cljs!"]])

(defn mount-root []
  (reagent/render [app] (.getElementById js/document "app")))