# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1292899008 -28800
# Node ID 5dbf421ae0b5a3f94a962ee6daaa612b63ee6cc0
# Parent  62f897baec0a59b1f6050c7d57c574f8fb0b66c2
Revert bogus 2010-10-24 change to widget-image-find.

* lisp/wid-edit.el (widget-image-find): Remove bogus :ascent spec from
image spec (Bug#7480).

diff -r 62f897baec0a -r 5dbf421ae0b5 lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Dec 21 11:30:36 2010 +0900
+++ b/lisp/ChangeLog	Tue Dec 21 10:36:48 2010 +0800
@@ -1,3 +1,8 @@
+2010-12-21  Chong Yidong  <cyd@stupidchicken.com>
+
+	* wid-edit.el (widget-image-find): Remove bogus :ascent spec from
+	image spec (Bug#7480).
+
 2010-12-21  Daiki Ueno  <ueno@unixuser.org>
 
 	* obsolete/pgg-parse.el, obsolete/pgg-pgp5.el, obsolete/pgg-pgp.el,
diff -r 62f897baec0a -r 5dbf421ae0b5 lisp/wid-edit.el
--- a/lisp/wid-edit.el	Tue Dec 21 11:30:36 2010 +0900
+++ b/lisp/wid-edit.el	Tue Dec 21 10:36:48 2010 +0800
@@ -637,8 +637,8 @@
 		specs)
 	   (dolist (elt widget-image-conversion)
 	     (dolist (ext (cdr elt))
-	       (push (list :type (car elt) :file (concat image ext)
-			   :ascent 'center) specs)))
+	       (push (list :type (car elt) :file (concat image ext))
+		     specs)))
  	   (find-image (nreverse specs))))
 	(t
 	 ;; Oh well.