From: Gerd Moellmann <gerd@gnu.org>
Date: Wed, 19 Sep 2001 09:12:54 +0000 (+0000)
Subject: (bdf-read-bitmap): Initialize returned values to
X-Git-Tag: emacs-pretest-21.0.106~67
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0240cfba7b3ad5ca0324f23f00431056ea3058bd;p=emacs.git

(bdf-read-bitmap): Initialize returned values to
defaults.
---

diff --git a/lisp/ps-bdf.el b/lisp/ps-bdf.el
index 34c65d55aa4..3f98e527bd7 100644
--- a/lisp/ps-bdf.el
+++ b/lisp/ps-bdf.el
@@ -359,8 +359,11 @@ The value is a list of DWIDTH, BBX, and BITMAP-STRING.
 DWIDTH is a pixel width of a glyph.
 BBX is a bounding box of the glyph.
 BITMAP-STRING is a string representing bits by hexadecimal digits."
-  (let ((coding-system-for-read 'no-conversion)
-	dwidth bbx height yoff bitmap-string)
+  (let* ((coding-system-for-read 'no-conversion)
+	 (bbx (elt (bdf-get-font-info bdfname) 4))
+	 (dwidth (elt bbx 0))
+	 (bitmap-string "")
+	 height yoff)
     (condition-case nil
 	(with-temp-buffer
 	  (insert-file-contents bdfname nil offset (+ offset maxlen))