Commit b0e2675c authored by Stefan Monnier's avatar Stefan Monnier
Browse files

* pcmpl-gnu.el: Use lexical-binding.

(pcmpl-gnu-with-file-buffer): Fix last change.
parent 428fe61a
;;; pcmpl-gnu.el --- completions for GNU project tools
;;; pcmpl-gnu.el --- completions for GNU project tools -*- lexical-binding: t -*-
;; Copyright (C) 1999-2011 Free Software Foundation, Inc.
......@@ -310,10 +310,11 @@
(size (nth 7 fa)))
(and (numberp size)
(< size large-file-warning-threshold))))
(completion-table-dynamic
(lambda (string)
(pcmpl-gnu-with-file-buffer (pcomplete-arg 1)
(mapcar #'tar-header-name tar-parse-info))))
(let ((file (pcomplete-arg 1)))
(completion-table-dynamic
(lambda (_string)
(pcmpl-gnu-with-file-buffer file
(mapcar #'tar-header-name tar-parse-info)))))
(pcomplete-entries))
nil 'identity))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment