From 3f0cdae6d6eaf737ecdbb94ccff6bcb66b4a11cf Mon Sep 17 00:00:00 2001
From: cage <cage@invalid>
Date: Sat, 28 Sep 2024 13:10:45 +0200
Subject: [PATCH] - fixed keychord for 'clear-cache' command.

---
 etc/init.lisp         | 2 +-
 src/command-line.lisp | 1 -
 2 files changed, 1 insertion(+), 2 deletions(-)

diff --git a/etc/init.lisp b/etc/init.lisp
index 28d8fa7..464a3ee 100644
--- a/etc/init.lisp
+++ b/etc/init.lisp
@@ -159,7 +159,7 @@
 
 (define-key "?"         #'print-quick-help)
 
-(define-key "C d"       #'clear-cache)
+(define-key "C-d"       #'clear-cache)
 
 (define-key "C-I"       #'pass-focus-next)
 
diff --git a/src/command-line.lisp b/src/command-line.lisp
index b5c17f8..fde5dc2 100644
--- a/src/command-line.lisp
+++ b/src/command-line.lisp
@@ -143,7 +143,6 @@
 
 (defparameter *free-arguments*                     nil)
 
-
 (defun exit-on-error (e)
   (format *error-output* "~a~%" e)
   (os-utils:exit-program 1))