diff lisp/ps-bdf.el @ 24449:2428731823fd

(bdf-directory-list): Different value for ms-dos.
author Eli Zaretskii <eliz@gnu.org>
date Sun, 07 Mar 1999 13:31:58 +0000
parents 3d446442b6a0
children 60d1fad41645
line wrap: on
line diff
--- a/lisp/ps-bdf.el	Sun Mar 07 13:27:35 1999 +0000
+++ b/lisp/ps-bdf.el	Sun Mar 07 13:31:58 1999 +0000
@@ -34,7 +34,10 @@
 (eval-when-compile (require 'ps-mule))
 
 ;;;###autoload
-(defvar bdf-directory-list '("/usr/local/share/emacs/fonts/bdf")
+(defvar bdf-directory-list
+  (if (eq system-type 'ms-dos)
+      (list (expand-file-name "../fonts/bdf" invocation-directory))
+    '("/usr/local/share/emacs/fonts/bdf"))
   "*List of directories to search for `BDF' font files.
 The default value is '("/usr/local/share/emacs/fonts/bdf").")