[Top][All Lists]
[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")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r105800: Indent.,
Lars Magne Ingebrigtsen <=