buncha-stuff
[gitmo/Class-MOP.git] / bench / lib / Plain / Point.pm
index 276f493..fca27b0 100644 (file)
@@ -9,7 +9,7 @@ sub new {
     my ( $class, %params ) = @_;
     
     return bless {
-        x => $params{x},
+        x => $params{x} || 10,
         y => $params{y},
     }, $class;
 }