changeset 99:ad09a826ebaf

Repaint viewport miniature when the viewport updates.
author Mikhail Kryshen <mikhail@kryshen.net>
date Tue, 15 Mar 2011 05:03:42 +0300
parents ff6e542671eb
children f8c8abb84e99
files src/net/kryshen/indyvon/layers.clj
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/net/kryshen/indyvon/layers.clj	Thu Mar 03 03:48:30 2011 +0300
+++ b/src/net/kryshen/indyvon/layers.clj	Tue Mar 15 05:03:42 2011 +0300
@@ -290,6 +290,7 @@
   [viewport width height]
   (let [miniature (miniature (:content viewport) width height)]
     (decorate-layer miniature [l]
+      (repaint-on-update viewport)
       (let [size (layer-size (:content viewport))
             s (scaling (:width size) (:height size) width height)
             [x y w h] (viewport-visible-bounds viewport)