martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Make last change compatible with XEmacs. From Christoph Wedler

Browse Source 
<christoph.wedler@sap.com>.
This commit is contained in:
Eli Zaretskii
2001-06-29 18:09:44 +00:00
parent 3024d92027
commit fc83ff0dde
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ps-bdf.el
View File

@@ -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))))