I hereby claim:
- I am pcstl on github.
- I am pcstl (https://keybase.io/pcstl) on keybase.
- I have a public key whose fingerprint is 2BB4 9736 2CB4 8AC3 8173 C879 14D9 5A25 D177 6DFC
To claim this, I am signing this object:
import Html as H exposing (Html) | |
import Html.Attributes as A | |
import Html.Events as Events | |
import Signal exposing (Signal, Address) | |
import StartApp.Simple as App | |
import List | |
options : List String | |
options = |
# -*- mode: gitignore; -*- | |
# This file was mostly stitched together from a bunch of gitignore files | |
# found at https://github.com/github/gitignore and is customized for my | |
# Linux setup. | |
# Emacs stuff # | |
############### | |
*~ | |
\#*\# |
I hereby claim:
To claim this, I am signing this object:
# -*- mode: gitignore; -*- | |
# Emacs # | |
######### | |
*~ | |
\#*\# | |
/.emacs.desktop | |
/.emacs.desktop.lock | |
*.elc | |
auto-save-list |
# ~/.bashrc: executed by bash(1) for non-login shells. | |
# see /usr/share/doc/bash/examples/startup-files (in the package bash-doc) | |
# for examples | |
# If not running interactively, don't do anything | |
case $- in | |
*i*) ;; | |
*) return;; | |
esac |
;;Utils------------------------------------------------------ | |
(defun my/append-to-list (list-var elements) | |
"Append ELEMENTS to the end of LIST-VAR. | |
The return value is the new value of LIST-VAR." | |
(unless (consp elements) | |
(error "ELEMENTS must be a list")) | |
(let ((list (symbol-value list-var))) | |
(if list | |
(setcdr (last list) elements) |
function rangeFromZero(end) { | |
return [...Array(end).keys()]; | |
} | |
function exclusiveRange(start, end) { | |
if (end === undefined) { | |
return rangeFromZero(start); | |
} | |
if (end > start) { | |
return rangeFromZero(end - start).map(x => x + start); |
if [ -d $HOME/.dotfiles ]; then | |
printf "Dotfiles directory already exists at $HOME/.dotfiles.\n\n" | |
printf "If you are sure you wish to restore dotfiles, delete the existing directory.\n\n" | |
exit 1 | |
fi | |
git clone --bare https://github.com/pcstl/dotfiles.git $HOME/.dotfiles | |
unalias dotfile 2> /dev/null | |
dotfile() { | |
/usr/bin/git --git-dir=$HOME/.dotfiles/ --work-tree=$HOME $@ |
f = x ^ 2 |
;; Fira code | |
(set-default-font "Fira Code") | |
(let ((alist '((33 . ".\\(?:\\(?:==\\|!!\\)\\|[!=]\\)") | |
(35 . ".\\(?:###\\|##\\|_(\\|[#(?[_{]\\)") | |
(36 . ".\\(?:>\\)") | |
(37 . ".\\(?:\\(?:%%\\)\\|%\\)") | |
(38 . ".\\(?:\\(?:&&\\)\\|&\\)") | |
(42 . ".\\(?:\\(?:\\*\\*/\\)\\|\\(?:\\*[*/]\\)\\|[*/>]\\)") | |
(43 . ".\\(?:\\(?:\\+\\+\\)\\|[+>]\\)") | |
(45 . ".\\(?:\\(?:-[>-]\\|<<\\|>>\\)\\|[<>}~-]\\)") |