From 4566ec69d269ecba8d9386a131b932ee5244aa8e Mon Sep 17 00:00:00 2001
From: Craig Jennings <c@cjennings.net>
Date: Sun, 5 May 2024 09:23:58 -0500
Subject: enhancements, functions, tests, and misc

enhancements
- move accent-company to C-` and ensure it's on for org mode
- re-enable narrow-to-region
- turn on network repos by default
- remove setq in company's use-package custom clause
- increase company delay to .7 secs
- recipe templates should have visibility show all
- move video recordings code to separate module
- move geiser-guile to prog-lisp

functions
- improve cj/reformat-region-or-buffer via restriction
- improvements to test-format-region
- adding tests for clear-blank-lines
- Add prepend-lines and replace-fraction-glyphs functions
- add cj/clear-blank-lines function
- create cj/load-all-tests utility function

tests
- add keybinding for ert-run-tests-interactively
- ensure ert libraries are available to load-all-tests
- remove running the tests when evaluating the buffer
- fix clear-blank-lines and adding better tests

misc
- updated packages
- adding the luddite blog to elfeed
- more abbrevs
---
 modules/prog-lisp.el | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

(limited to 'modules/prog-lisp.el')

diff --git a/modules/prog-lisp.el b/modules/prog-lisp.el
index 59eb122b..c68e04cf 100644
--- a/modules/prog-lisp.el
+++ b/modules/prog-lisp.el
@@ -80,8 +80,11 @@
 	(ert t))
 
   (keymap-global-unset "C-r" t)
+  (keymap-global-unset "C-R" t)
   (define-key emacs-lisp-mode-map (kbd "C-r") 'ert-all-tests)
-  (define-key lisp-interaction-mode-map (kbd "C-r") 'ert-all-tests))
+  (define-key emacs-lisp-mode-map (kbd "C-R") 'ert-run-tests-interactively)
+  (define-key lisp-interaction-mode-map (kbd "C-r") 'ert-all-tests)
+  (define-key lisp-interaction-mode-map (kbd "C-R") 'ert-run-tests-interactively))
 
 (use-package el-mock) ;; mock/stub framework
 
@@ -125,6 +128,15 @@
   (set-face-foreground 'rainbow-delimiters-depth-8-face "#999")     ;; medium gray
   (set-face-foreground 'rainbow-delimiters-depth-9-face "#666"))    ;; dark gray
 
+;; -------------------------------- Geiser Guile -------------------------------
+;; Guile support in Emacs
+
+(use-package geiser-guile
+  :defer 1
+  :commands (geiser-guile)
+  :bind ("C-c G" . geiser-guile)
+  :config
+  (setq geiser-guile-binary "/usr/bin/guile"))
 
 (provide 'prog-lisp)
 ;;; prog-lisp.el ends here
-- 
cgit v1.2.3