From 6bfa51ba88183f82128a5d06e86e640c27b4707f Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Tue, 21 Dec 2010 10:36:48 +0800 Subject: [PATCH] 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). --- lisp/ChangeLog | 5 +++++ lisp/wid-edit.el | 4 ++-- 2 files changed, 7 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e39cfc83d0..b3b9295247 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2010-12-21 Chong Yidong + + * wid-edit.el (widget-image-find): Remove bogus :ascent spec from + image spec (Bug#7480). + 2010-12-21 Daiki Ueno * 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 9c7de61d7c..5b6bc97db2 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. -- 2.20.1