Update of /project/eclipse/cvsroot/eclipse In directory cl-net:/tmp/cvs-serv19512

Modified Files: themer.lisp Log Message: Fix: nil as initial element is needed otherwise 0 might be used and will not be a pixmap.

--- /project/eclipse/cvsroot/eclipse/themer.lisp 2009/11/17 21:17:29 1.13 +++ /project/eclipse/cvsroot/eclipse/themer.lisp 2009/11/18 13:42:39 1.14 @@ -1,5 +1,5 @@ ;;; -*- Mode: Lisp; Package: ECLIPSE-INTERNALS -*- -;;; $Id: themer.lisp,v 1.13 2009/11/17 21:17:29 ihatchondo Exp $ +;;; $Id: themer.lisp,v 1.14 2009/11/18 13:42:39 ihatchondo Exp $ ;;; ;;; This file is part of Eclipse. ;;; Copyright (C) 2002 Iban HATCHONDO @@ -353,7 +353,8 @@ collect `(incf nb-buttons) end collect `(setf (gethash ,key frame-item-pixmaps) (make-array - ,(if (eq key :custom) (length names) 4))) + ,(if (eq key :custom) (length names) 4) + :initial-element nil)) nconc (loop for name in names for i from 0