emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] 01/01: [xpm int] Use ‘cl-destructuring-bind’, not ‘destructuring


From: Thien-Thi Nguyen
Subject: [elpa] 01/01: [xpm int] Use ‘cl-destructuring-bind’, not ‘destructuring-bind’.
Date: Fri, 13 Jun 2014 11:50:27 +0000

ttn pushed a commit to branch master
in repository elpa.

commit 22ec52ec5544c70cfad78608eb52ba36c514ea31
Author: Thien-Thi Nguyen <address@hidden>
Date:   Fri Jun 13 13:53:35 2014 +0200

    [xpm int] Use ‘cl-destructuring-bind’, not ‘destructuring-bind’.
    
    * packages/xpm/xpm.el (xpm-grok, xpm-raster): ...here.
---
 packages/xpm/xpm.el |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/packages/xpm/xpm.el b/packages/xpm/xpm.el
index 34354d6..7ed6f6a 100644
--- a/packages/xpm/xpm.el
+++ b/packages/xpm/xpm.el
@@ -115,7 +115,7 @@ the buffer intangible.  Optional arg SIMPLE inhibits that."
       (goto-char (point-min))
       (search-forward "{")
       (skip-chars-forward "^\"")
-      (destructuring-bind (w h nc cpp &rest rest)
+      (cl-destructuring-bind (w h nc cpp &rest rest)
           (read (format "(%s)" (read (current-buffer))))
         (ignore rest)                   ; for now
         (forward-line 1)
@@ -391,7 +391,7 @@ see variable `xpm-raster-inhibit-continuity-optimization'."
                                          x))
                            t))
                    (if rangep
-                       (destructuring-bind (b . e) x
+                       (cl-destructuring-bind (b . e) x
                          (rset ext (norm b) (span b e) nil))
                      (aset ext (norm x) nil))
                    (when acc



reply via email to

[Prev in Thread] Current Thread [Next in Thread]