From c17796a60dba0c81ffb03ad277063a7eee2e1736 Mon Sep 17 00:00:00 2001 From: William Carroll Date: Wed, 2 Sep 2020 14:00:43 +0100 Subject: Rename alist.el to al.el After switching my namespace separator from "/" to "-" the function, `alist-get`, clashed (surprise!) with the pre-existing function, `alist-get`. As I was struggling to debug my broken Emacs (it broke bc Emacs 27 rolled out), and I changed the module name, "alist", to "al" attempting to defuse the issue. --- emacs/.emacs.d/wpc/window-manager.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'emacs/.emacs.d/wpc/window-manager.el') diff --git a/emacs/.emacs.d/wpc/window-manager.el b/emacs/.emacs.d/wpc/window-manager.el index 5c109cb53c..a648ac875e 100644 --- a/emacs/.emacs.d/wpc/window-manager.el +++ b/emacs/.emacs.d/wpc/window-manager.el @@ -21,6 +21,7 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'alert) +(require 'al) (require 'prelude) (require 'string) (require 'cycle) @@ -285,8 +286,8 @@ Ivy is used to capture the user's input." (funcall (lambda () (shell-command - (alist-get (ivy-read "System: " (alist-keys name->cmd)) - name->cmd)))))) + (al-get (ivy-read "System: " (al-keys name->cmd)) + name->cmd)))))) (defun window-manager--label->index (label workspaces) "Return the index of the workspace in WORKSPACES named LABEL." @@ -356,7 +357,7 @@ predicate." buffer))))) (label (completing-read "Switch to EXWM buffer: " buffer-alist))) (exwm-workspace-switch-to-buffer - (alist-get label buffer-alist nil nil #'string=)))) + (al-get label buffer-alist)))) (when window-manager--install-kbds? (progn -- cgit 1.4.1