--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/bin/screenshot-area Sat Jul 21 02:34:40 2018 +0000
@@ -0,0 +1,5 @@
+#!/usr/bin/env bash
+
+set -euo pipefail
+
+sleep 0.2 ; scrot 'screenshot_%Y-%m-%d_%H-%M-%S.png' -s -e 'mv $f ~/screenshots && echo -n ~/screenshots/$f' | xsel --clipboard --input
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/bin/screenshot-screen Sat Jul 21 02:34:40 2018 +0000
@@ -0,0 +1,5 @@
+#!/usr/bin/env bash
+
+set -euo pipefail
+
+sleep 0.2 ; scrot 'screenshot_%Y-%m-%d_%H-%M-%S.png' -m -e 'mv $f ~/screenshots && echo -n ~/screenshots/$f' | xsel --clipboard --input
--- a/gitconfig Thu Jul 19 00:16:12 2018 +0000
+++ b/gitconfig Sat Jul 21 02:34:40 2018 +0000
@@ -5,7 +5,7 @@
[core]
pager = cat
editor = nvim
- excludesfile = /Users/sjl/.gitignore
+ excludesfile = ~/.gitignore
[alias]
tags = tag -l
--- a/gitignore Thu Jul 19 00:16:12 2018 +0000
+++ b/gitignore Sat Jul 21 02:34:40 2018 +0000
@@ -11,3 +11,4 @@
.cache-main
.cache-tests
*.fasl
+.notmylispwords
--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/restic/excludes.txt Sat Jul 21 02:34:40 2018 +0000
@@ -0,0 +1,7 @@
+.cache
+cache2
+/home/sjl/.dbus
+/home/sjl/src/dotfiles/vim/tmp
+/home/sjl/.mozilla
+/home/sjl/Dropbox/.dropbox.cache
+
--- a/roswell/lispindent.lisp Thu Jul 19 00:16:12 2018 +0000
+++ b/roswell/lispindent.lisp Sat Jul 21 02:34:40 2018 +0000
@@ -63,7 +63,8 @@
(defparameter *config-files*
(list (merge-pathnames ".lispwords" (user-homedir-pathname))
- ".lispwords" ))
+ ".lispwords"
+ ".notmylispwords"))
(defun source-config-files ()
--- a/stumpwmrc Thu Jul 19 00:16:12 2018 +0000
+++ b/stumpwmrc Sat Jul 21 02:34:40 2018 +0000
@@ -6,7 +6,7 @@
;;;; Config -------------------------------------------------------------------
(set-prefix-key (kbd "C-space"))
-;; (redirect-all-output (data-dir-file "debug" "text"))
+(redirect-all-output (data-dir-file "debug" "text"))
(setf *mouse-focus-policy* :click
*message-window-gravity* :center
@@ -102,6 +102,15 @@
;;;; Load ---------------------------------------------------------------------
(load-module "pass")
+;;;; Screenshotting -----------------------------------------------------------
+(defcommand screenshot-area () ()
+ ;; todo why the hell do these not pick up my fuckin path?
+ (run-shell-command "/home/sjl/src/dotfiles/bin/screenshot-area"))
+
+(defcommand screenshot-screen () ()
+ (run-shell-command "/home/sjl/src/dotfiles/bin/screenshot-screen"))
+
+
;;;; Commands -----------------------------------------------------------------
(defcommand sane-hsplit () ()
(hsplit)
@@ -211,8 +220,8 @@
("H-o" "spotify")
("H-I" "intellij")
("H-q" "exec slock")
- ("H-y" "exec scrot 'screenshot_%Y-%m-%d_%H-%M-%S.png' -s -e 'mv $f ~/screenshots && echo -n ~/screenshots/$f' | xclip -sel clip")
- ("H-Y" "exec scrot 'screenshot_%Y-%m-%d_%H-%M-%S.png' -m 'mv $f ~/screenshots && echo -n ~/screenshots/$f' | xclip -sel clip")
+ ("H-y" "screenshot-area")
+ ("H-Y" "screenshot-screen")
("H-r" "loadrc")
("H-V" "vlime"))
@@ -233,7 +242,8 @@
(define-top-keys ;; splitting
("H-s" "sane-vsplit")
- ("H-v" "sane-hsplit"))
+ ("H-v" "sane-hsplit")
+ ("H-=" "balance-frames"))
(define-top-keys ;; killing
("H-w" "delete")