--- /dev/null
+use strict;
+use warnings;
+use Test::More tests => 1;
+
+{
+ package Foo;
+ use Mouse::Role;
+
+ use overload
+ q{""} => sub { 42 },
+ fallback => 1;
+
+ no Mouse::Role;
+}
+
+{
+ package Bar;
+ use Mouse;
+ with 'Foo';
+ no Mouse;
+}
+
+my $bar = Bar->new;
+
+TODO: {
+ local $TODO = "the special () method isn't properly composed into the class";
+ is("$bar", 42, 'overloading can be composed');
+}