From 48a9c9c1a60f4f5ebc71a5e5269b01109c9dcfa4 Mon Sep 17 00:00:00 2001 From: Mark Wooding Date: Sat, 17 Feb 2024 14:34:24 +0000 Subject: [PATCH] el/dot-emacs.el (mdw-regexp): Sort the input list. It's compile time. Nobody cares about the extra time, and it's a weight off of my mind as a caller. --- el/dot-emacs.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/el/dot-emacs.el b/el/dot-emacs.el index 48819b4..7fe8757 100644 --- a/el/dot-emacs.el +++ b/el/dot-emacs.el @@ -62,7 +62,7 @@ This may be at the expense of cool features.") "Turn a LIST of strings into a single regular expression at compile-time." (declare (indent nil) (debug 0)) - `',(make-regexp list)) + `',(make-regexp (sort (copy-list list) #'string<))) (defun mdw-wrong () "This is not the key sequence you're looking for." -- 2.11.0