[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] 01/01: [aa2u int] Don't use ‘ cl-labels’ when ‘cl-flet*’ will do.
From: |
Thien-Thi Nguyen |
Subject: |
[elpa] 01/01: [aa2u int] Don't use ‘ cl-labels’ when ‘cl-flet*’ will do. |
Date: |
Fri, 09 May 2014 14:54:17 +0000 |
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.