From 9133b82e6f850b96eeb8c1e2c62fbeb52f111673 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sat, 1 Jun 2013 13:10:08 -0700 Subject: [PATCH] * lisp/pcmpl-gnu.el (pcomplete/tar): Check obsolete variable is bound. --- lisp/ChangeLog | 2 ++ lisp/pcmpl-gnu.el | 3 ++- 2 files changed, 4 insertions(+), 1 deletion(-) 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 + * 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) -- 2.39.2