Changeset 6921 for lang/scala/sandbox

Timestamp:

02/19/08 17:32:50 (9 months ago)

Author:

kmizu

Message:

 

Files:

• lang/scala/sandbox/src/jp/gr/java_conf/mizu/gui/GUIBuilder.scala (modified) (4 diffs)

lang/scala/sandbox/src/jp/gr/java_conf/mizu/gui/GUIBuilder.scala

@@ -13 +13 @@
 
 trait GUIBuilder {
-  val context :DynamicVariable[AnyRef] = new DynamicVariable[AnyRef](null)
+  private val _context :DynamicVariable[AnyRef] = new DynamicVariable[AnyRef](null)
+  def context :AnyRef = _context.value
+  def context_=(value :AnyRef) { _context.value = value }
+  def withContext(value :AnyRef)(thunk : => Unit) {
+    _context.withValue(value)(thunk)
+  }
         def setProperty(target :AnyRef, property :Symbol, value :Any) {
           invoke(target, "set" + property.name.capitalize, value)
@@ -21 +26 @@
         }
         def asContainer :Container = {
-                context.value match {
+                context match {
                 case frame:JFrame => frame.getContentPane
                 case container:Container => container
@@ -32 +37 @@
     case (property:Symbol, value:Any) => setProperty(frame, property, value)
     }
-    context.withValue(frame)(thunk)
+    withContext(frame)(thunk)
     frame
   }
@@ -55 +60 @@
           asContainer.setLayout(layoutManager)
         }
+  def pack {
+    context match { case frame:JFrame => frame.pack }
+  }
 }