leshy

#!/bin/bash
rm dl.list

for i in $(seq -f "%03g" 1 140)
do
echo "https://archive.org/compress/jwz-mixtape-${i}/formats=VBR%20MP3&file=/jwz-mixtape-${i}.zip" >> dl.list
done

wget -ci dl.list

leshy

Keybase proof

I hereby claim:

• I am leshy on github.
• I am lesh (https://keybase.io/lesh) on keybase.
• I have a public key whose fingerprint is 5E79 D2A9 2462 8020 DD4B 9A46 5E00 9023 46BB 19B9

To claim this, I am signing this object:

leshy

    # class dict does internally what next example does explicitly (builds a dict of { cls.__name__ : cls }
    return f.map_keys(
        arg(last, call('lower')), # equivalent to next example lambda
        f.class_dict(
            common.service.RestartableService.__subclasses__(),
            common.service.Service.__subclasses__()
        )).get(service_name.lower())

    # list comprehension, but utilizing map_keys

leshy

(defun livescript-compile-region-emacs ()
  (interactive)
  (save-excursion
    (setq livescript-args-compile '("-c" "--no-header" "--bare"))
    (if (equal mark-active nil) (mark-whole-buffer))
    (livescript-compile-region (point) (mark))
    (deactivate-mark)
    (setq livescript-args-compile '("-c" "--no-header" "-m" "embedded")))
)

leshy

(require 'sclang)

(add-to-list 'auto-mode-alist '("\\.sc$" . sclang-mode))
(add-to-list 'auto-mode-alist '("\\.sclang$" . sclang-mode))

(add-hook 'sclang-mode-hook
          (lambda () (progn
                       (local-set-key (kbd "C-q C-e") 'sclang-eval-region)
                       (local-set-key (kbd "C-q C-c") 'sclang-eval-region)
                       (local-set-key (kbd "C-q C-s") 'sclang-server-free-all)

leshy

(load-file "~/emacs/el/lesh/colorpicker/colorpicker.el")

(defun xah-syntax-color-hex ()
  "Syntax color hex color spec such as 「 #FF1100 」 in current buffer."
  (interactive)
  (font-lock-add-keywords
   nil
   '(("#[abcdefABCDEF[:digit:]]\\{6\\}"
      (0 (put-text-property
          (+ (match-beginning 0) 1)

leshy

#!/bin/bash
# downloads all mp3 jwz mixtapes (1-75)
for i in `seq -f "%03g" 1 75`;
do
URL="https://archive.org/compress/jwz-mixtape-$i/formats=VBR%20MP3&file=/jwz-mixtape-$i.zip"
echo $URL
wget -c $URL
done

for z in *.zip

leshy

;flycheck livescript

(flycheck-define-checker livescript
  "A Livescript syntax checker using livescript.
  See URL `http://livescript.net/'."
  :command ("livescript" "--compile" "--print" "--stdin")
  :standard-input t
  :error-patterns
  ((error line-start "[" (message) "on line " line "]" line-end))
  :modes livescript-mode)

leshy

Keybase proof

I hereby claim:

• I am leshy on github.
• I am lesh (https://keybase.io/lesh) on keybase.
• I have a public key whose fingerprint is 35DB 878B A6B8 69A8 EE4A B304 C5F7 4693 F248 EF57

To claim this, I am signing this object:

leshy

# a trick that makes class instances function instances and not object instances
# aka - callable objects. (expects object to have a 'call' function defined)

callable = (cls) ->
  callable_cls = (...args) ->
    obj = (...args) -> obj.call.apply obj, args
    obj.__proto__ = cls::
    cls.apply obj, args
    obj