[Emacs-diffs] emacs/lisp ChangeLog ps-bdf.el

[Vinicius Jose Latorre]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Vinicius Jose Latorre <viniciusjl>      08/12/05 14:56:22

Modified files:
        lisp           : ChangeLog ps-bdf.el 

Log message:
        Transform defvar into defcustom.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.14919&r2=1.14920
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ps-bdf.el?cvsroot=emacs&r1=1.34&r2=1.35

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.14919
retrieving revision 1.14920
diff -u -b -r1.14919 -r1.14920
--- ChangeLog   5 Dec 2008 13:36:46 -0000       1.14919
+++ ChangeLog   5 Dec 2008 14:56:18 -0000       1.14920
@@ -2,6 +2,11 @@
 
        * dired.el (dired-font-lock-keywords): Fix last change.
 
+2008-12-05  Vinicius Jose Latorre  <address@hidden>
+
+       * ps-bdf.el (bdf-directory-list): Transform (defvar ... "*..")
+       into (defcustom ... "..." :type ... :group...).
+
 2008-12-05  Juanma Barranquero  <address@hidden>
 
        * international/mule-diag.el (mule-diag): Display the window

Index: ps-bdf.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/ps-bdf.el,v
retrieving revision 1.34
retrieving revision 1.35
diff -u -b -r1.34 -r1.35
--- ps-bdf.el   6 May 2008 07:57:47 -0000       1.34
+++ ps-bdf.el   5 Dec 2008 14:56:22 -0000       1.35
@@ -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.