From c65f964d37feb0a2b8a30040a59a3da6d853d236 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Wed, 15 Feb 2012 09:32:23 +0000 Subject: [PATCH] shr.el (shr-rescale-image): Undo previous change; see . --- lisp/ChangeLog | 5 +++++ lisp/shr.el | 3 +-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index de13a27b4..ea25f2671 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -3,6 +3,11 @@ * shr.el (shr-remove-trailing-whitespace): Really delete the padding on too-wide lines. +2012-02-15 Paul Eggert + + * shr.el (shr-rescale-image): Undo previous change; see + . + 2012-02-13 Lars Ingebrigtsen * nnimap.el (nnimap-record-commands): New variable. diff --git a/lisp/shr.el b/lisp/shr.el index f594a60e0..f3d750329 100644 --- a/lisp/shr.el +++ b/lisp/shr.el @@ -557,8 +557,7 @@ the URL of the image to the kill buffer instead." (insert alt))) (defun shr-rescale-image (data) - (let* ((max-image-size nil) - (image (create-image data nil t :ascent 100))) + (let ((image (create-image data nil t :ascent 100))) (if (or (not (fboundp 'imagemagick-types)) (not (get-buffer-window (current-buffer)))) image -- 2.25.1