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/bag.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'emacs/.emacs.d/wpc/bag.el') diff --git a/emacs/.emacs.d/wpc/bag.el b/emacs/.emacs.d/wpc/bag.el index 3061f01a7492..38a09d94f900 100644 --- a/emacs/.emacs.d/wpc/bag.el +++ b/emacs/.emacs.d/wpc/bag.el @@ -27,6 +27,7 @@ ;; Dependencies ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; +(require 'al) (require 'number) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -42,11 +43,11 @@ (defun bag-new () "Create an empty bag." - (make-bag :xs (alist-new))) + (make-bag :xs (al-new))) (defun bag-contains? (x xs) "Return t if XS has X." - (alist-has-key? x (bag-xs xs))) + (al-has-key? x (bag-xs xs))) ;; TODO: Tabling this for now since working with structs seems to be ;; disappointingly difficult. Where is `struct-update'? -- cgit 1.4.1