This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defun ariel/get-file-lines (filename) | |
(with-temp-buffer (insert-file-contents filename) | |
(cl-remove-duplicates (split-string (buffer-string) "\n" t))) | |
) | |
(defun ariel/copy-string-to-clipboard (str) | |
(with-temp-buffer (insert str) | |
(clipboard-kill-region (point-min) (point-max)))) | |
(defun ariel/get-command-from-bash-history () |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# I've been using a combination of yabai, skhd (with modal keybindings), and sketchybar. | |
## Recently, with the deprecation of the window border in yabai. I had to find a way to | |
## keep track of the skhd current mode. | |
# Add the following lines to sketchybarrc: | |
sketchybar --add item mode_indicator left | |
sketchybar --set mode_indicator drawing_method=separator | |
sketchybar --set mode_indicator label="default-mode | " |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(begin-tx "module") | |
(env-data | |
{ 'ns-admin-keyset: ["admin"] | |
, 'ns-operate-keyset: ["operate"] | |
, 'ns-genesis-keyset: { "keys": [], "pred": "="} | |
, 'ns: "la" | |
, 'upgrade:false}) | |
(env-keys ["admin", "operate"]) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defun org-babel-execute:pact (body params) | |
"Execute a Pact block with specified parameters." | |
(let* ((tempfile (org-babel-temp-file "pact-" ".repl")) | |
(pact-process (start-process "pact-repl" "*pact-repl-output*" "pact")) | |
(load-command (format "(load \"%s\")\n" tempfile)) | |
(output-buffer "*pact-repl-output*")) | |
;; Ensure the REPL is ready | |
(sleep-for 1) ;; Adjust based on REPL start time | |
;; Write body to temporary file | |
(with-temp-file tempfile |