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 diff
     1.1 --- a/src/net/kryshen/indyvon/layers.clj	Thu Mar 03 03:48:30 2011 +0300
     1.2 +++ b/src/net/kryshen/indyvon/layers.clj	Tue Mar 15 05:03:42 2011 +0300
     1.3 @@ -290,6 +290,7 @@
     1.4    [viewport width height]
     1.5    (let [miniature (miniature (:content viewport) width height)]
     1.6      (decorate-layer miniature [l]
     1.7 +      (repaint-on-update viewport)
     1.8        (let [size (layer-size (:content viewport))
     1.9              s (scaling (:width size) (:height size) width height)
    1.10              [x y w h] (viewport-visible-bounds viewport)