diff options
| author | Vinicius Jose Latorre <viniciusjl@ig.com.br> | 2008-12-05 14:56:18 +0000 |
|---|---|---|
| committer | Vinicius Jose Latorre <viniciusjl@ig.com.br> | 2008-12-05 14:56:18 +0000 |
| commit | 6530de7d397e2c051d1076fd4d75a04993006b77 (patch) | |
| tree | ea7c3e5a938d0dc96ad2ff6889ea8547e81ba309 /lisp/ps-bdf.el | |
| parent | 68c5540bb719334db73e877737b894f514690e99 (diff) | |
Transform defvar into defcustom.
Diffstat (limited to 'lisp/ps-bdf.el')
| -rw-r--r-- | lisp/ps-bdf.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/ps-bdf.el b/lisp/ps-bdf.el index c5b394a7212..d508e3f62b3 100644 --- a/lisp/ps-bdf.el +++ b/lisp/ps-bdf.el @@ -40,12 +40,15 @@ (require 'ps-mule)) ;;;###autoload -(defvar bdf-directory-list +(defcustom bdf-directory-list (if (memq system-type '(ms-dos windows-nt)) (list (expand-file-name "fonts/bdf" installation-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\").") + "List of directories to search for `BDF' font files. +The default value is '(\"/usr/local/share/emacs/fonts/bdf\")." + :type '(repeat :tag "BDF font directory list" + (directory :tag "BDF font directory")) + :group 'ps-print-miscellany) ;; 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. |