- (let ((iplayer-command-frame (car info))
- (iplayer-command-window (cadr info))
- (iplayer-command-buffer (caddr info))
- (keys (car (cdddr info)))
- (function (cadr (cdddr info))))
+ (let ((iplayer-command-frame (nth 0 info))
+ (iplayer-command-window (nth 1 info))
+ (iplayer-command-buffer (nth 2 info))
+ (keys (nth 3 info))
+ (function (nth 4 info)))