[xpm int] Use ‘cl-destructuring-bind’, not ‘destructuring-bind’.

[gnu-emacs-elpa] / packages / xpm / xpm.el

diff --git a/packages/xpm/xpm.el b/packages/xpm/xpm.el
index 34354d6a746ee5796257386ae83d7b6439e44017..7ed6f6ad328126260009eabc4aa7d5eb70012122 100644 (file)
--- 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