emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r105800: Indent.


From: Lars Magne Ingebrigtsen
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r105800: Indent.
Date: Sat, 17 Sep 2011 06:53:25 +0200
User-agent: Bazaar (2.3.1)

------------------------------------------------------------
revno: 105800
committer: Lars Magne Ingebrigtsen <address@hidden>
branch nick: trunk
timestamp: Sat 2011-09-17 06:53:25 +0200
message:
  Indent.
modified:
  lisp/gnus/mm-view.el
=== modified file 'lisp/gnus/mm-view.el'
--- a/lisp/gnus/mm-view.el      2011-04-01 14:24:22 +0000
+++ b/lisp/gnus/mm-view.el      2011-09-17 04:53:25 +0000
@@ -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")


reply via email to

[Prev in Thread] Current Thread [Next in Thread]