changeset 20:357bdd7d0550

Context in Anchor protocol.
author Mikhail Kryshen <mikhail@kryshen.net>
date Fri, 18 Jun 2010 04:39:56 +0400
parents 43f0d78057a9
children a70609bad3a4
files src/indyvon/core.clj
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/indyvon/core.clj	Thu Jun 17 20:59:22 2010 +0400
+++ b/src/indyvon/core.clj	Fri Jun 18 04:39:56 2010 +0400
@@ -140,12 +140,12 @@
 
 (defprotocol Anchored
   "Provide anchor point for Layers. Used by viewport."
-  (anchor [this] "Anchor point: [x y]"))
+  (anchor [this context] "Anchor point: [x y]"))
 
 ;; Default implementation of Anchored for any Layer.
 (extend-protocol Anchored
   indyvon.core.Layer
-  (anchor [this] [0 0]))
+  (anchor [this context] [0 0]))
 
 (defn viewport
   "Creates scrollable viewport layer."