[nongnu] elpa/pacmacs edf7b2d1b3 069/472: Use plist-bind macro for pacman-anim-get-frame (#54)

[ELPA Syncer]

branch: elpa/pacmacs
commit edf7b2d1b37c1c518debd044fece17bcaf532286
Author: rexim <reximkut@gmail.com>
Commit: rexim <reximkut@gmail.com>

    Use plist-bind macro for pacman-anim-get-frame (#54)
---
 pacman-anim.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/pacman-anim.el b/pacman-anim.el
index 57f7fb5cb4..ed7b2d8e7b 100644
--- a/pacman-anim.el
+++ b/pacman-anim.el
@@ -35,6 +35,7 @@
 (require 'json)
 
 (require 'pacman-image)
+(require 'pacman-utils)
 
 (defun pacman-make-anim (frames sprite-sheet)
   (list :frames frames
@@ -70,8 +71,9 @@
             '(x y w h))))
 
 (defun pacman-anim-get-frame (anim)
-  (let ((frames (plist-get anim :frames))
-        (current-frame (plist-get anim :current-frame)))
+  (plist-bind ((frames :frames)
+               (current-frame :current-frame))
+      anim
     (nth current-frame frames)))
 
 (defun pacman-anim-next-frame (anim)