Reset the colors by passing undef

diff --git a/bindings/perl/Champlain/examples/capitals.pl b/bindings/perl/Champlain/examples/capitals.pl
index 8fc5447ef10674853658a4f552c389757775e896..1a7f7edebb539412a239f328aa5b81aaf736df8e 100755 (executable)
--- a/bindings/perl/Champlain/examples/capitals.pl
+++ b/bindings/perl/Champlain/examples/capitals.pl
@@ -158,10 +158,8 @@ sub capital_callback {
        if (@markers) {
                # Reset the color of the previous marker
                my $marker = $markers[-1];
-               my $white = Clutter::Color->new(0xff, 0xff, 0xff, 0xff);
-               my $black = Clutter::Color->new(0x00, 0x00, 0x00, 0xff);
-               $marker->set_text_color($white);
-               $marker->set_color($black);
+               $marker->set_text_color(undef);
+               $marker->set_color(undef);
        }
        $data->{markers} = \@markers;