summaryrefslogtreecommitdiff
path: root/lisp/iswitchb.el
diff options
context:
space:
mode:
authorStephen Eglen <stephen@gnu.org>2002-09-26 15:50:59 +0000
committerStephen Eglen <stephen@gnu.org>2002-09-26 15:50:59 +0000
commit1be9d941db393814d53f2a5cb672b06e169f7679 (patch)
treece76b4524c6a7487dbf207f9c340b1042424e898 /lisp/iswitchb.el
parent368534aba05a15e3a17d31f4b54fbbd040d50a19 (diff)
downloademacs-1be9d941db393814d53f2a5cb672b06e169f7679.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))