# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1560010050 14400
# Node ID 25592561dd6fcdfc5e8eda38bb6daac7f42d83ee
# Parent  93292b5dede067c3bddeb0ecb805e23e53985360# Parent  e6377c64c49b820f712fd985bd882973bc3b203e
Merge.

diff -r e6377c64c49b -r 25592561dd6f bin/cool-retro-term
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/bin/cool-retro-term	Sat Jun 08 12:07:30 2019 -0400
@@ -0,0 +1,1 @@
+../../cool-retro-term/cool-retro-term
\ No newline at end of file
diff -r e6377c64c49b -r 25592561dd6f bin/disks
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/bin/disks	Sat Jun 08 12:07:30 2019 -0400
@@ -0,0 +1,8 @@
+#!/usr/bin/env bash
+
+set -euo pipefail
+
+lsblk -o name,mountpoint,model,label,size,fstype | egrep -v "^loop" 
+echo
+echo
+df -h | egrep -v '^/dev/loop' | egrep -v tmpfs
diff -r e6377c64c49b -r 25592561dd6f bin/moo
--- a/bin/moo	Wed Jun 05 11:51:29 2019 -0400
+++ b/bin/moo	Sat Jun 08 12:07:30 2019 -0400
@@ -6,4 +6,9 @@
 PROGS=("cowsay" "cowthink")
 PROG=${PROGS[$RANDOM % ${#PROGS[@]}]}
 
-toilet -t -k -F gay:crop -f calvins "$@" | $PROG -n -$COW
+COLORS=("gay" "metal")
+COLOR=${COLORS[$RANDOM % ${#COLORS[@]}]}
+
+clear
+toilet -t -k -F metal:$COLOR -f future "$@" | $PROG -n -$COW
+read
diff -r e6377c64c49b -r 25592561dd6f stumpwmrc
--- a/stumpwmrc	Wed Jun 05 11:51:29 2019 -0400
+++ b/stumpwmrc	Sat Jun 08 12:07:30 2019 -0400
@@ -198,6 +198,16 @@
   (load "~/src/dotfiles/vim/bundle/vlime/lisp/start-vlime.lisp")
   (message "Started VLIME"))
 
+(defcommand vlime-port (port) ((:number "Port: "))
+  "Start VLIME on the given port.
+
+  Good for bootstrapping a VLIME connection when you accidentally started a
+  VLIME instance on another port that you don't want to mess with.
+
+  "
+  (funcall (read-from-string "vlime-loader::run") port)
+  (message "Started VLIME"))
+
 (defcommand toggle-current-mode-line () ()
   (toggle-mode-line (current-screen) (current-head)))
 
@@ -226,6 +236,9 @@
     ((:string "Symbol: "))
   (run-shell-command (format nil "clhs --url 'http://www.lispworks.com/documentation/HyperSpec/' --quiet --open echon '~A' | pbcopy" s)))
 
+(defcommand describe-window () ()
+  (show-window-properties))
+
 
 ;;;; Terminal Fonts -----------------------------------------------------------
 (defcommand st-font-up ()