pass more examples

Author: Nicholas Schwaderer

examples/legacy/for_playtest/shoes3-tests/wheel/wheel1.rb

@@ -1,3 +1,5 @@
+# CHECKED BY SCHWAD
+
 Shoes.app do
   stack height: 200 do
     click do |b,l,t|
@@ -19,5 +21,9 @@
       end
     end
   end
+  stack height: 200 do
+    border blue, strokewidth: 2
+    para "Stack 2"
+  end
   wheel {|d,l,t,mods | @p.replace "default slot wheel #{d} #{mods}"}
 end

lib/scarpe/wv/subscription_item.rb

@@ -165,10 +165,11 @@ def set_parent(new_parent)
       # Wheel event (mouse wheel / trackpad scroll). Positive delta = scroll up/away from user.
       # In browsers, deltaY is positive when scrolling down (content moves up), which is
       # opposite to what Shoes3 expects. We negate it for Shoes compatibility.
+      # stopPropagation prevents the event from bubbling to parent slots.
       new_parent.set_event_callback(
         self,
         "onwheel",
-        handler_js_code(
+        "arguments[0].stopPropagation();" + handler_js_code(
           @shoes_api_name,
           "-arguments[0].deltaY",  # Negate for Shoes3 convention: positive = up
           "arguments[0].clientX",

scarpe-components/lib/scarpe/components/calzini/slots.rb

@@ -84,9 +84,9 @@ def slot_style(props)
       # Other attach values (another drawable) would need more complex handling
     end
 
-    ## A new slot defines a new coordinate system, so absolutely-positioned children
-    ## are relative to it. But that's going to need a lot of testing and Shoes3 comparison.
-    #styles[:position] = "relative"
+    # Slots need position:relative so that absolutely-positioned children
+    # (like Border drawables) anchor to their parent slot, not the window.
+    styles[:position] = "relative" unless styles[:position]
 
     styles
   end