From: Eli Zaretskii Date: Fri, 29 Jun 2001 18:09:44 +0000 (+0000) Subject: Make last change compatible with XEmacs. From Christoph Wedler X-Git-Tag: emacs-pretest-21.0.104~107 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fc83ff0ddec4ef86eb9d8f4b6137c8ff330a4dbf;p=emacs.git Make last change compatible with XEmacs. From Christoph Wedler . --- diff --git a/lisp/ps-bdf.el b/lisp/ps-bdf.el index 733588185d2..4e19eae6b9e 100644 --- a/lisp/ps-bdf.el +++ b/lisp/ps-bdf.el @@ -40,7 +40,8 @@ ;;;###autoload (defvar bdf-directory-list - (if (memq system-type '(ms-dos windows-nt)) + (if (and (memq system-type '(ms-dos windows-nt)) + (boundp 'installation-directory)) (list (expand-file-name "fonts/bdf" installation-directory)) '("/usr/local/share/emacs/fonts/bdf")) "*List of directories to search for `BDF' font files. @@ -48,7 +49,8 @@ The default value is '(\"/usr/local/share/emacs/fonts/bdf\").") ;; MS-DOS and MS-Windows users like to move the binary around after ;; it's built, but the value above is computed at load-up time. -(and (memq system-type '(ms-dos windows-nt)) +(and (and (memq system-type '(ms-dos windows-nt)) + (boundp 'installation-directory)) (setq bdf-directory-list (list (expand-file-name "fonts/bdf" installation-directory))))