about summary refs log tree commit diff
path: root/emacs/.emacs.d/wpc/window-manager.el
diff options
context:
space:
mode:
authorWilliam Carroll <wpcarro@gmail.com>2020-09-02T13·00+0100
committerWilliam Carroll <wpcarro@gmail.com>2020-09-02T13·00+0100
commitc17796a60dba0c81ffb03ad277063a7eee2e1736 (patch)
treebbbecb27c710bdb2c60ababeddfcf064d2ded11b /emacs/.emacs.d/wpc/window-manager.el
parent1fe5d0373ec90faa2e5c66d399b21d978792e135 (diff)
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.
Diffstat (limited to 'emacs/.emacs.d/wpc/window-manager.el')
-rw-r--r--emacs/.emacs.d/wpc/window-manager.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/emacs/.emacs.d/wpc/window-manager.el b/emacs/.emacs.d/wpc/window-manager.el
index 5c109cb53cad..a648ac875eea 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