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).

2 files changed, 7 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e39cfc83d0c..b3b9295247f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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 --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 9c7de61d7cd..5b6bc97db2c 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -637,8 +637,8 @@ extension (xpm, xbm, gif, jpg, or png) located in
                 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.