From: Lars Magne Ingebrigtsen <larsi@gnus.org>
Date: Sat, 17 Sep 2011 11:55:34 +0000 (+0000)
Subject: mm-view.el (mm-inline-image-emacs): Indent.
X-Git-Url: http://cgit.sxemacs.org/?p=gnus;a=commitdiff_plain;h=32bca861ee9fe356a5c380b6b5e09ccdc88edead

mm-view.el (mm-inline-image-emacs): Indent.
---

diff --git a/lisp/mm-view.el b/lisp/mm-view.el
index 5a90f015a..926422865 100644
--- a/lisp/mm-view.el
+++ b/lisp/mm-view.el
@@ -90,13 +90,14 @@
     (put-image
      (let ((image (mm-get-image handle)))
        (if (eq mm-inline-large-images 'resize)
-           (gnus-rescale-image image
-                               (let ((edges (gnus-window-inside-pixel-edges
-                                             (get-buffer-window (current-buffer)))))
-                                 (cons (truncate (* mm-inline-large-images-proportion
-                                                    (- (nth 2 edges) (nth 0 edges))))
-                                       (truncate (* mm-inline-large-images-proportion
-                                                    (- (nth 3 edges) (nth 1 edges)))))))
+           (gnus-rescale-image
+	    image
+	    (let ((edges (gnus-window-inside-pixel-edges
+			  (get-buffer-window (current-buffer)))))
+	      (cons (truncate (* mm-inline-large-images-proportion
+				 (- (nth 2 edges) (nth 0 edges))))
+		    (truncate (* mm-inline-large-images-proportion
+				 (- (nth 3 edges) (nth 1 edges)))))))
          image))
      b)
     (insert "\n\n")