Unifying pcase separator block to single case.

chaosemer · Nov 25, 2023 · 2c93eff · 2c93eff
1 parent 9aa0bc7
commit 2c93eff
Showing 1 changed file with 3 additions and 4 deletions.
diff --git a/window-tool-bar.el b/window-tool-bar.el
@@ -92,10 +92,9 @@ This is for when you want more customizations than
 MENU-ITEM: Menu item to convert.  See info node (elisp)Tool Bar."
   (pcase menu-item
     ;; Separators
-    (`(,_ "--")
-     "|")
-    (`(,_ menu-item ,(and (pred stringp)
-                          (pred (string-prefix-p "--"))))
+    ((or `(,_ "--")
+         `(,_ menu-item ,(and (pred stringp)
+                              (pred (string-prefix-p "--")))))
      "|")
 
     ;; Main workhorse