;; hippie is asking us to try the "next" completion; we don't have one
nil
(let ((pos (point))
- (undo-len (length pending-undo-list)))
+ (undo-len (if (sequencep pending-undo-list) (length pending-undo-list) 0)))
(undo-boundary)
(condition-case nil
(progn
(skeleton-expand)
t)
- ('error
+ (error
;; undo hook action if any
- (unless (= undo-len (length pending-undo-list))
+ (unless (= undo-len (if (sequencep pending-undo-list) (length pending-undo-list) 0))
(undo))
;; undo motion