From 69ccd6d73edbfa8109247381576073da2088cc7a Mon Sep 17 00:00:00 2001
From: Peter Tillemans <pti@snamellit.com>
Date: Tue, 30 Jul 2024 20:11:52 +0200
Subject: [PATCH] fix evil-paredit bug and remove chicken support for now

---
 init.org | 18 +++++++++++++++++-
 1 file changed, 17 insertions(+), 1 deletion(-)

diff --git a/init.org b/init.org
index 25317e0..0d3a72e 100644
--- a/init.org
+++ b/init.org
@@ -1331,12 +1331,28 @@ see also [[https://www.masteringemacs.org/article/how-to-get-started-tree-sitter
 #+END_SRC
 
 #+RESULTS:
+****** TODO FIx paredit bug related to obsolete macro
+
+evil-paredit relies on an obsolete (and no longer available method)
+`evil-called-interactively-p`. So I define it here till evil-paredit
+has implemented the new method.
+
+#+BEGIN_SRC emacs-lisp
+(defmacro evil-called-interactively-p ()
+  "Wrapper for `called-interactively-p'.
+In older versions of Emacs, `called-interactively-p' takes
+no arguments.  In Emacs 23.2 and newer, it takes one argument."
+  (called-interactively-p 'any))
+(make-obsolete 'evil-called-interactively-p
+               "please use (called-interactively-p 'any) instead."
+               "Git commit 222b791")
+
+#+END_SRC
 
 ***** Enable Geiser Mode in Scheme Mode
 
 Configure Geiser and Scheme
  - map .scm file by default to Guile
- - configure chicken scheme interpreter and compiler
 
 #+BEGIN_SRC emacs-lisp
   (use-package geiser