From 2a1990ed907e57aea61ec5fab41fe9d47c19e371 Mon Sep 17 00:00:00 2001
From: Christopher James Hayward <chris@chrishayward.xyz>
Date: Tue, 23 Feb 2021 09:53:03 -0500
Subject: [PATCH] Add screenshot package

---
 README.org         | 19 +++++++++++++------
 modules/writing.el |  9 ++++++---
 2 files changed, 19 insertions(+), 9 deletions(-)

diff --git a/README.org b/README.org
index fdb71a4..9ef4c73 100644
--- a/README.org
+++ b/README.org
@@ -1021,6 +1021,13 @@ Open an agenda buffer with =SPC a=.
 
 *** Images
 
+Capture screenshots with [[https://github.com/tecosaur/screenshot][screenshot.el]].
+
+#+begin_src emacs-lisp
+(use-package screenshot
+  :commands (screenshot))
+#+end_src
+
 Create screencasts with =one-frame-per-action= GIF recording via [[https://github.com/takaxp/emacs-gif-screencast][emacs-gif-screencast]].
 
 + Pause / Resume
@@ -1035,15 +1042,15 @@ It requires the installation of ~scrot~, ~gifsicle~, and ~convert~ from the =Ima
   :custom (gif-screencast-output-directory (concat dotfiles/home "docs/images/")))
 #+end_src
 
-Screencast controls behind =SPC s=.
-+ Start / stop with =s=
-+ Pause with =t=
+Place keybindings behind =SPC s=.
++ Screenshot with =s=
++ Screencast with =c=
 
 #+begin_src emacs-lisp
 (dotfiles/leader
-  "s" '(:ignore t :which-key "Screencast")
-  "ss" '(gif-screencast-start-or-stop :which-key "Start / Stop")
-  "sp" '(gif-screencast-toggle-pause :which-key "Pause"))
+  "s" '(:ignore t :which-key "Screen")
+  "ss" '(screenshot :which-key "Screenshot")
+  "sc" '(gif-screencast-start-or-stop :which-key "Screencast"))
 #+end_src
 
 *** Grammar
diff --git a/modules/writing.el b/modules/writing.el
index 90adc72..549097a 100644
--- a/modules/writing.el
+++ b/modules/writing.el
@@ -121,14 +121,17 @@
 (dotfiles/leader
   "a" '(org-agenda :which-key "Agenda"))
 
+(use-package screenshot
+  :commands (screenshot))
+
 (use-package gif-screencast
   :commands (gif-screencast-start-or-stop gif-screencast-toggle-pause)
   :custom (gif-screencast-output-directory (concat dotfiles/home "docs/images/")))
 
 (dotfiles/leader
-  "s" '(:ignore t :which-key "Screencast")
-  "ss" '(gif-screencast-start-or-stop :which-key "Start / Stop")
-  "sp" '(gif-screencast-toggle-pause :which-key "Pause"))
+  "s" '(:ignore t :which-key "Screen")
+  "ss" '(screenshot :which-key "Screenshot")
+  "sc" '(gif-screencast-start-or-stop :which-key "Screencast"))
 
 (use-package writegood-mode
   :after org