diff options
| author |  David Aspinall <da@inf.ed.ac.uk> | 2004-04-16 17:35:58 +0000 |
|---|---|---|
| committer | David Aspinall <da@inf.ed.ac.uk> | 2004-04-16 17:35:58 +0000 |
| commit | ff17818207cd996554e8eb17890388493ed63257 (patch) | |
| tree | f6d693370757f73c0a596a68bc5d26997ff08614 /generic | |
| parent | 2b17630a04cc510ef6c504614ab59e99071c5cce (diff) | |
Add boundp check to proof-map-multiple-frame-specifiers, for some back compatibility.
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/pg-response.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/generic/pg-response.el b/generic/pg-response.el index abfdd328..73354166 100644 --- a/generic/pg-response.el +++ b/generic/pg-response.el @@ -81,9 +81,10 @@ Internal variable, setting this will have no effect!") (defun proof-map-multiple-frame-specifiers (multiframep locale) "Set XEmacs specifiers according to MULTIFRAMEP in LOCALE." (dolist (spec proof-multiframe-specifiers) - (set-specifier (car spec) - (if multiframep (cadr spec) (caddr spec) ) - locale))) + (if (boundp (car spec)) ;; FIXME: this is for backwards compatibility XE 21.1 + (set-specifier (car spec) + (if multiframep (cadr spec) (caddr spec) ) + locale)))) (defconst proof-multiframe-parameters '((minibuffer . nil) |