(defvar *data-list*
  (list
   (list (cons :name "reset") (cons :path "reset.jpg") (cons :pose_key ":reset-pose"))
   (list (cons :name "manip") (cons :path "manip.jpg") (cons :pose_key ":reset-manip-pose"))))
