From ac85f3a3cfcc1ca6e974cd90645fe3ff27158326 Mon Sep 17 00:00:00 2001 From: Lucien Cartier-Tilet Date: Thu, 29 Jul 2021 22:39:05 +0200 Subject: [PATCH] =?UTF-8?q?Add=20back=20this=20piece=20of=20code=20otherwi?= =?UTF-8?q?se=20StumpWM=20won=E2=80=99t=20work=20it=20seems?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- init.lisp | 6 ++++++ keybindings.lisp | 1 - 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/init.lisp b/init.lisp index 2ebdfbc..90b2ea9 100644 --- a/init.lisp +++ b/init.lisp @@ -1,3 +1,9 @@ +#-quicklisp +(let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp" + (user-homedir-pathname)))) + (when (probe-file quicklisp-init) + (load quicklisp-init))) + ;;; init (in-package :stumpwm) (setf *default-package* :stumpwm) diff --git a/keybindings.lisp b/keybindings.lisp index 289b05a..5622d4f 100644 --- a/keybindings.lisp +++ b/keybindings.lisp @@ -106,7 +106,6 @@ (define-key *top-map* (kbd "s-a") '*my-applications-keymap*) (define-key *root-map* (kbd "SPC") "exec kitty") -(define-key *root-map* (kbd "b") "exec firefox") (define-key *root-map* (kbd "l") "exec plock") (define-key *root-map* (kbd "r") "reload") (define-key *root-map* (kbd "w") '*my-frames-management-keymap*)