Re: New GNOME icons

[Katsumi Yamaoka <yamaoka@jpl.org>]

>>>>> In <yamaokay7zcjh4f.fsf@jpl.org> Katsumi Yamaoka wrote:

>> It suggests there's no way that she uses her favorite images instead
>> of the ones Emacs provides.

> An alternative plan is here:

> 	* gmm-utils.el (gmm-image-load-path-for-library): Look for the
> 	most preferred directory which may be specified in image-load-path
> 	by a user.

Oops, we should use `file-truename' to check directories a user
added to `image-load-path'.  Here's a part in question:

[...]
	(let ((image-load-path
	       (butlast
		(symbol-value 'image-load-path)
		(length (member (file-truename
				 (file-name-as-directory image-directory))
				(mapcar
				 (lambda (dir)
				   (if (stringp dir)
				       (file-truename
					(expand-file-name
					 (file-name-as-directory dir)))
				     dir))
				 (symbol-value 'image-load-path)))))))
[...]