File emacs-24.4-ps-bdf.patch of Package emacs.7839

---
 lisp/ldefs-boot.el |    4 ++--
 lisp/ps-bdf.el     |    4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

--- lisp/ldefs-boot.el
+++ lisp/ldefs-boot.el	2017-09-22 09:54:57.114564921 +0000
@@ -22141,9 +22141,9 @@ With prefix argument ARG, restart the Pr
 ;;;### (autoloads nil "ps-bdf" "ps-bdf.el" (22768 58519 620336 792000))
 ;;; Generated autoloads from ps-bdf.el
 
-(defvar 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")) "\
+(defvar bdf-directory-list (if (memq system-type '(ms-dos windows-nt)) (list (expand-file-name "fonts/bdf" installation-directory)) '("/usr/share/fonts/bdf")) "\
 List of directories to search for `BDF' font files.
-The default value is (\"/usr/local/share/emacs/fonts/bdf\").")
+The default value is (\"/usr/share/fonts/bdf\").")
 
 (custom-autoload 'bdf-directory-list "ps-bdf" t)
 
--- lisp/ps-bdf.el
+++ lisp/ps-bdf.el	2017-09-22 09:53:18.780402545 +0000
@@ -42,9 +42,9 @@
 (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"))
+    '("/usr/share/fonts/bdf"))
   "List of directories to search for `BDF' font files.
-The default value is (\"/usr/local/share/emacs/fonts/bdf\")."
+The default value is (\"/usr/share/fonts/bdf\")."
   :type '(repeat :tag "BDF font directory list"
 		 (directory :tag "BDF font directory"))
   :group 'ps-print-miscellany)