[aa2u int] Don't use ‘cl-labels’ when ‘cl-flet*’ will do.

* packages/ascii-art-to-unicode/ascii-art-to-unicode.el (aa2u-replacement): ...here.

diff --git a/packages/ascii-art-to-unicode/ascii-art-to-unicode.el b/packages/ascii-art-to-unicode/ascii-art-to-unicode.el
index 7d03a9d72e8883dd634728002b4e0097b52cd115..9aaa7ef8f9061061d1f7d8e3126117e681594567 100644 (file)
--- a/packages/ascii-art-to-unicode/ascii-art-to-unicode.el
+++ b/packages/ascii-art-to-unicode/ascii-art-to-unicode.el
@@ -124,7 +124,7 @@ Their values are STRINGIFIER and COMPONENTS, respectively."
 
 (defun aa2u-replacement (pos)
   (let ((cc (- pos (line-beginning-position))))
-    (cl-labels
+    (cl-flet*
         ((ok (name pos)
              (when (or
                     ;; Infer LIGHTness between "snug" ‘?+’es.