diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2001-09-16 18:03:28 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2001-09-16 18:03:28 +0000 |
| commit | a5f01960473be2b86d3cb4b238aca7a94155f0d3 (patch) | |
| tree | 673f336366f95998ed044192eec620752851ee5e /lisp/ps-bdf.el | |
| parent | a007e4e39dbb01153acbaa837b050afab420f2f8 (diff) | |
| download | emacs-a5f01960473be2b86d3cb4b238aca7a94155f0d3.tar.gz | |
(bdf-cache-file) <ms-dos>: Use _bdfcache.el, since
convert-standard-filename doesn't guarantee that the .el extension
is preserved.
Diffstat (limited to 'lisp/ps-bdf.el')
| -rw-r--r-- | lisp/ps-bdf.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ps-bdf.el b/lisp/ps-bdf.el index 66c3faf3cb1..34c65d55aa4 100644 --- a/lisp/ps-bdf.el +++ b/lisp/ps-bdf.el @@ -104,7 +104,12 @@ If BDFNAME doesn't exist, return nil." (insert-file-contents file-name) buf))))) -(defvar bdf-cache-file (convert-standard-filename "~/.bdfcache.el") +(defvar bdf-cache-file (if (eq system-type 'ms-dos) + ;; convert-standard-filename doesn't + ;; guarantee that the .el extension will be + ;; preserved. + "~/_bdfcache.el" + (convert-standard-filename "~/.bdfcache.el")) "Name of cache file which contains information of `BDF' font files.") (defvar bdf-cache nil |