* lisp/pcmpl-gnu.el (pcomplete/tar): large-file-warn-threshold can be nil.

Fixes: debbugs:9160

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c14312209b6fbe916f1f3464bdf8a3388a317bc2..ef99c31d1e883211088ce9b915986ff58536f20f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2011-12-02  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+       * pcmpl-gnu.el (pcomplete/tar): large-file-warn-threshold can be nil
+       (bug#9160).
+
        * dired-aux.el (dired-query): Don't assume help-char is modifier-free
        (bug#10191).
 

diff --git a/lisp/pcmpl-gnu.el b/lisp/pcmpl-gnu.el
index b2c8de6ec2fbc34e6c276251e4afbf7784000a43..608a9dc2e8800e54c0d1c0e4c06637196abf32f3 100644 (file)
--- a/lisp/pcmpl-gnu.el
+++ b/lisp/pcmpl-gnu.el
@@ -309,7 +309,8 @@
                      (let* ((fa (file-attributes (pcomplete-arg 1)))
                             (size (nth 7 fa)))
                        (and (numberp size)
-                            (< size large-file-warning-threshold))))
+                            (or (null large-file-warning-threshold)
+                                (< size large-file-warning-threshold)))))
                 (let ((file (pcomplete-arg 1)))
                   (completion-table-dynamic
                    (lambda (_string)