;; variables to parse args, so there's no point autoloading it.
;; ;;;###autoload
(defun pcomplete-std-complete ()
- (let ((data pcomplete-completions-at-point))
+ (let ((data (pcomplete-completions-at-point)))
(completion-in-region (nth 0 data) (nth 1 data) (nth 2 data)
(plist-get :predicate (nthcdr 3 data)))))