From a6a1a96fb92e747b73ea420d3ceb3f6e9eb2e790 Mon Sep 17 00:00:00 2001 From: JSDurand Date: Fri, 31 Dec 2021 20:50:05 +0800 Subject: bookmark-conf: use a named function for sorting --- bookmark-conf.el | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/bookmark-conf.el b/bookmark-conf.el index eaf6dbc..74878dd 100644 --- a/bookmark-conf.el +++ b/bookmark-conf.el @@ -92,12 +92,7 @@ ;;;;; Automatic groups (ilist-dag "durand" blist-filter-default-label - (cond - ;; The following two clauses ensure that the default group - ;; stays at the bottom of the list. - ((string= x "Default") nil) - ((string= y "Default")) - ((string-lessp x y))) + #'blist-filter-sorter-default (save-match-data (let* ((handler (bookmark-get-handler element)) (handler-name (and handler (format "%S" handler))) -- cgit v1.2.3-18-g5258