patch for bbdb-hack-x-face

In bbdb-hack-x-face, the variable 'h' is not initialized properly. -jeff Changelog entry: 2001-08-13 Jeff Mincy <jeff(a)delphioutpost.com&gt; * fix bbdb-hack-x-face call to make-glyph Patch: cvs diff -u -r bbdb-1_13 bbdb-gui.el >> .diff2 Index: bbdb-gui.el =================================================================== RCS file: /home/cvsroot/xemacs/xemacs-packages/lisp/bbdb/bbdb-gui.el,v retrieving revision 1.1 diff -u -r1.1 bbdb-gui.el --- bbdb-gui.el 2001/07/24 02:48:08 1.1 +++ bbdb-gui.el 2001/08/14 01:20:17 ＠＠ -231,13 +231,13 ＠＠ ;; ripped pretty much verbatim from VM; X Faces for recent XEmacsen. ((string-match "^21\\." emacs-version) ;; XXX how far back can I go? (condition-case data - (let (g h) + (let* ((h (concat "X-Face: " (car face))) ;; from vm-display-xface + (g (intern h vm-xface-cache))) (if (find-face 'vm-xface) ;; heck, why not use the same face? nil (make-face 'vm-xface) (set-face-background 'vm-xface "white") (set-face-foreground 'vm-xface "black")) - (setq g (intern (car face) vm-xface-cache)) (if (boundp g) (setq g (symbol-value g)) (set g (make-glyph