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

[Thien-Thi Nguyen]

ttn pushed a commit to branch master
in repository elpa.

commit 554c6bc2dbfb4354a37adf8d182af6c483722610
Author: Thien-Thi Nguyen <address@hidden>
Date:   Fri May 9 16:58:43 2014 +0200

    [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.
---
 .../ascii-art-to-unicode/ascii-art-to-unicode.el   |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

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 7d03a9d..9aaa7ef 100644
--- 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.