projects
/
gitmo/Class-MOP.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
buncha-stuff
[gitmo/Class-MOP.git]
/
bench
/
lib
/
Plain
/
Point.pm
diff --git
a/bench/lib/Plain/Point.pm
b/bench/lib/Plain/Point.pm
index
276f493
..
fca27b0
100644
(file)
--- a/
bench/lib/Plain/Point.pm
+++ b/
bench/lib/Plain/Point.pm
@@
-9,7
+9,7
@@
sub new {
my ( $class, %params ) = @_;
return bless {
- x => $params{x},
+ x => $params{x} || 10,
y => $params{y},
}, $class;
}