[perl-win32-gui-users] Using both protocols fo AddHyperlink

[Erick J. B. <er...@e-...>]

I have a problem when I use both protocols, for the Hyperlink module, one after the other.
The following example will open a the mailto always, for both. And when I switch them,
that is, put the http after the mailto, then it will always open a the http, for both. It
falls through and the first one is ignored. I tried looking at the hyperlink module, but 
I don't see anything wrong. Any thoughts?

# Script #
use Win32::GUI;
use Win32::GUI::HyperLink;

my $Window = new Win32::GUI::Window(
    -title => 'Win32::GUI::HyperLink demo',
    -pos => [ 100, 100 ],
    -size => [ 150, 100 ],
    -name => 'Window',
);
$Window->AddHyperLink(
    -text => "dada's perl lab",
    -name => "test",
    -pos => [ 25, 15 ],
    -url => "http://dada.perl.it",
);
$Window->AddHyperLink(
    -text => "email dada's perl lab",
    -name => "test",
    -pos => [ 25, 35 ],
    -url => "mailto:dada\@perl.it",
);
$Window->Show();
Win32::GUI::Dialog();

sub Window_Terminate {
    return -1;
}
# EOF #

erick
never stop questioning
www.jeb.ca