projects
/
gitmo/Moose.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
3dda07f
)
fix trigger example
Hans Dieter Pearcey [Sun, 5 Jul 2009 02:12:25 +0000 (22:12 -0400)]
lib/Moose/Manual/Attributes.pod
patch
|
blob
|
blame
|
history
diff --git
a/lib/Moose/Manual/Attributes.pod
b/lib/Moose/Manual/Attributes.pod
index
9c2aff9
..
0c269d9
100644
(file)
--- a/
lib/Moose/Manual/Attributes.pod
+++ b/
lib/Moose/Manual/Attributes.pod
@@
-456,12
+456,12
@@
set:
);
sub _size_set {
- my ( $self, $size ) = @_;
+ my ( $self, $size, $old_size ) = @_;
my $msg = $self->name;
- if (@_) {
- $msg .= " - old size was $_[0]";
+ if (@_ > 2) {
+ $msg .= " - old size was $old_size";
}
$msg .= " - size is now $size";