summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2013-06-01 13:10:08 -0700
committerGlenn Morris <rgm@gnu.org>2013-06-01 13:10:08 -0700
commit9133b82e6f850b96eeb8c1e2c62fbeb52f111673 (patch)
treef1887d9c8230e51a0e32f8849eb8b5ccaae8a5b3
parent02c992ecf3673396af52cb51dd31e91baee24833 (diff)
downloademacs-9133b82e6f850b96eeb8c1e2c62fbeb52f111673.tar.gz
* lisp/pcmpl-gnu.el (pcomplete/tar): Check obsolete variable is bound.
-rw-r--r--lisp/ChangeLog2
-rw-r--r--lisp/pcmpl-gnu.el3
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a7ac80ad774..269deb86abe 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
2013-06-01 Glenn Morris <rgm@gnu.org>
+ * pcmpl-gnu.el (pcomplete/tar): Check obsolete variable is bound.
+
Plain (f)boundp silences compilation warnings since Emacs 22.1.
* progmodes/cc-cmds.el (delete-forward-p):
* progmodes/cc-defs.el (buffer-syntactic-context-depth):
diff --git a/lisp/pcmpl-gnu.el b/lisp/pcmpl-gnu.el
index 91b146fdc78..fb31984facc 100644
--- a/lisp/pcmpl-gnu.el
+++ b/lisp/pcmpl-gnu.el
@@ -158,7 +158,8 @@
"Completion for the GNU tar utility."
;; options that end in an equal sign will want further completion...
(let (saw-option complete-within)
- (let ((pcomplete-suffix-list (cons ?= pcomplete-suffix-list)))
+ (let ((pcomplete-suffix-list (if (boundp 'pcomplete-suffix-list)
+ (cons ?= pcomplete-suffix-list))))
(while (pcomplete-match "^-" 0)
(setq saw-option t)
(if (pcomplete-match "^--" 0)