title: Clojure Developer Tooling for Speed and Productivity in 2024
So you’ll show me your cool workflows! (help me get better!)
# Reconstructed via infocmp from file: /usr/share/terminfo/t/tmux-256color | |
tmux-256color|tmux with 256 colors, | |
OTbs, OTpt, am, hs, km, mir, msgr, xenl, AX, G0, | |
colors#256, cols#80, it#8, lines#24, pairs#32767, U8#1, | |
acsc=++\,\,--..00``aaffgghhiijjkkllmmnnooppqqrrssttuuvvwwxxyyzz{{||}}~~, | |
bel=^G, blink=\E[5m, bold=\E[1m, cbt=\E[Z, civis=\E[?25l, | |
clear=\E[H\E[J, cnorm=\E[34h\E[?25h, cr=^M, | |
csr=\E[%i%p1%d;%p2%dr, cub=\E[%p1%dD, cub1=^H, | |
cud=\E[%p1%dB, cud1=^J, cuf=\E[%p1%dC, cuf1=\E[C, | |
cup=\E[%i%p1%d;%p2%dH, cuu=\E[%p1%dA, cuu1=\EM, |
#! /bin/bash | |
# find . -maxdepth 1 -type d \( ! -name . \) -print0 | xargs -0 -L1 ~/Tresors/Documents/private-dotfiles/scripts/run-git-fetch.sh | |
fetch_file=".git-fetch" | |
debug_mode="false" | |
master_branch="main" | |
echo "[git-fetch-dir] Working in $1" | |
cd "$1" || exit |
;;; scroll-other-window.el --- Variable commands for scrolling the other window. | |
;; Copyright (C) 2016 Andreas Politz | |
;; Author: Andreas Politz <politza@fh-trier.de> | |
;; Keywords: extensions, frames | |
;; This program is free software; you can redistribute it and/or modify | |
;; it under the terms of the GNU General Public License as published by | |
;; the Free Software Foundation, either version 3 of the License, or |
- Specific Notmuch filters (and saved-searches) for: | |
+ The Feed (newsletters, blogs) | |
+ The Paper trail (receipts, ledger) | |
+ Screened Inbox (mail from folks you actually want to read) | |
+ Previously Seen (important mail that you've already read) | |
+ Unscreened Inbox (potential spam / stuff you don't want) | |
- Elisp Functions to move / categorize emails from a particular sender. | |
+ Adds tags needed by filters defined above to all email sent by a particular sender | |
+ Creates an entry in a DB file, which is used by the Notmuch post-new script when indexing new email, to auto-add the relevant tags. |
(ns game-of-life | |
(:require [clojure.set :as cs])) | |
(defn calculate-neighbour-coordinates* | |
[[x y]] | |
(->> (vector [(+ x 1) y] | |
[(- x 1) y] | |
[x (+ y 1)] | |
[x (- y 1)] | |
[(+ x 1) (+ y 1)] |
#! /bin/bash | |
# find . -maxdepth 1 -type d \( ! -name . \) -print0 | xargs -0 -L1 /path/to/run-git-fetch.sh | |
fetch_file=".git-fetch" | |
echo "Working in $1" | |
cd "$1" || exit | |
fetch_upstream_and_merge() |
(ns challenges.psk | |
"A Simulation of the Passport Seva Kendra" | |
(:require [clj-time.core :as ct] | |
[clojure.tools.logging :as ctl]) | |
(:import [java.util.concurrent LinkedBlockingQueue PriorityBlockingQueue])) | |
(def working-hours? (atom false)) ; use this to control agents. | |
; Turning this off will | |
; shutdown agents. |
I hereby claim:
To claim this, I am signing this object:
(require 'recentf) | |
;; Implement functionality similar to uniquify to make recentf results bearable | |
;; Requires s.el and dash.el - awesome libraries from Magnar Sveen | |
;; Hat-tip : Baishampayan Ghose for the clojure implementation at | |
;; https://gist.github.com/ghoseb/8432086 | |
(require 's) | |
(require 'dash) | |