summaryrefslogtreecommitdiff
path: root/lisp/iswitchb.el
diff options
context:
space:
mode:
authorStephen Eglen <stephen@gnu.org>2002-09-26 15:52:31 +0000
committerStephen Eglen <stephen@gnu.org>2002-09-26 15:52:31 +0000
commit4e141ed744f843814cf1bcc0d0fe5a5f674419f6 (patch)
treed9e616fed7224d2654e0245e6e9a08996f8ab6e8 /lisp/iswitchb.el
parent3bcd2096bb3dcfb06b74214e598d6c10329e544e (diff)
downloademacs-4e141ed744f843814cf1bcc0d0fe5a5f674419f6.tar.gz
(iswitchb-completions): Test that iswitchb-common-match-string is a
string, before printing common completions.
Diffstat (limited to 'lisp/iswitchb.el')
-rw-r--r--lisp/iswitchb.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/iswitchb.el b/lisp/iswitchb.el
index 0b283d0ae77..d24f737851b 100644
--- a/lisp/iswitchb.el
+++ b/lisp/iswitchb.el
@@ -1260,7 +1260,8 @@ Modified from `icomplete-completions'."
;; put in common completion item -- what you get by
;; pressing tab
- (if (> (length iswitchb-common-match-string) (length name))
+ (if (and (stringp iswitchb-common-match-string)
+ (> (length iswitchb-common-match-string) (length name)))
(concat open-bracket-determined
(substring iswitchb-common-match-string
(length name))