return 1;
}
-sub _as_string { $_[0]->name } # overload ""
-sub _identity; # overload 0+
+# overloading stuff
+
+sub _as_string { $_[0]->name } # overload ""
+sub _identity; # overload 0+
sub _unite { # overload infix:<|>
my($lhs, $rhs) = @_;
=head1 VERSION
-This document describes Mouse version 0.82
+This document describes Mouse version 0.84
=head1 DESCRIPTION