diff options
| author | Eli Zaretskii | 2001-06-29 17:50:27 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2001-06-29 17:50:27 +0000 |
| commit | 3f4f2289db728fb5e521a45b152ec02f9518e48f (patch) | |
| tree | 249511dd0134b90a51a578b215db5a2f84488fc0 | |
| parent | 546cf5b0f92557f78dbd2121fa1e7c77ea4f3c9a (diff) | |
| download | emacs-3f4f2289db728fb5e521a45b152ec02f9518e48f.tar.gz emacs-3f4f2289db728fb5e521a45b152ec02f9518e48f.zip | |
(bdf-directory-list): Use the value relative to
installation-directory for MS-Windows as well.
| -rw-r--r-- | lisp/ps-bdf.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/ps-bdf.el b/lisp/ps-bdf.el index 241f4d9aaa4..733588185d2 100644 --- a/lisp/ps-bdf.el +++ b/lisp/ps-bdf.el | |||
| @@ -40,15 +40,15 @@ | |||
| 40 | 40 | ||
| 41 | ;;;###autoload | 41 | ;;;###autoload |
| 42 | (defvar bdf-directory-list | 42 | (defvar bdf-directory-list |
| 43 | (if (eq system-type 'ms-dos) | 43 | (if (memq system-type '(ms-dos windows-nt)) |
| 44 | (list (expand-file-name "fonts/bdf" installation-directory)) | 44 | (list (expand-file-name "fonts/bdf" installation-directory)) |
| 45 | '("/usr/local/share/emacs/fonts/bdf")) | 45 | '("/usr/local/share/emacs/fonts/bdf")) |
| 46 | "*List of directories to search for `BDF' font files. | 46 | "*List of directories to search for `BDF' font files. |
| 47 | The default value is '(\"/usr/local/share/emacs/fonts/bdf\").") | 47 | The default value is '(\"/usr/local/share/emacs/fonts/bdf\").") |
| 48 | 48 | ||
| 49 | ;; MS-DOS users like to move the binary around after it's built, but | 49 | ;; MS-DOS and MS-Windows users like to move the binary around after |
| 50 | ;; the value above is computed at load-up time. | 50 | ;; it's built, but the value above is computed at load-up time. |
| 51 | (and (eq system-type 'ms-dos) | 51 | (and (memq system-type '(ms-dos windows-nt)) |
| 52 | (setq bdf-directory-list | 52 | (setq bdf-directory-list |
| 53 | (list (expand-file-name "fonts/bdf" installation-directory)))) | 53 | (list (expand-file-name "fonts/bdf" installation-directory)))) |
| 54 | 54 | ||