Ok... Got it working!
So this is what I've found out this morning testing the
set_url_hook() function. Seems that whatever is set in
"$about_window->set_website($url);" for the $url variable will get passed to the "open_url()" sub which is an argument to the
"$about_window->set_url_hook("open_url");" function, which is a subroutine.
So with these 2 commands I can now successfully open the URL in a browser when I click on the link:
### 1st we need to define HOOK before we set the website:
# *open_url() is a Subroutine:
$about_window->set_url_hook("open_url");
### Now we call the set_website() function:
# *The $website var will be passed as an ARG to open_url():
$about_window->set_website($website);
# This receives 2 Args:
# ARG[0] --> AboutDialog Widget
# ARG[1] --> $website
sub open_url() {
my ($widget, $url) = @_;
print " url == $url\n";
print "Widget == $widget\n\n";
open_browser($url);
}
So now it seems everything is working as expected...! Thanks again Crackers, if you hadn't posted your example of the
set_url_hook("open_broswer", $url) it probably would have taken me much longer to find that's how the syntax should be for that set_url_hook() Function's Arguments...!
So thanks again for the reply, much appreciated!
Thanks Again,
Matt
Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
Read Where should I post X? if you're not absolutely sure you're posting in the right place.
Please read these before you post! —
Posts may use any of the Perl Monks Approved HTML tags:
- a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
| |
For: |
|
Use: |
| & | | & |
| < | | < |
| > | | > |
| [ | | [ |
| ] | | ] |
Link using PerlMonks shortcuts! What shortcuts can I use for linking?
See Writeup Formatting Tips and other pages linked from there for more info.