5 include('/elements/init_overlib.html')
7 include( '/elements/popup_link-prospect_main.html', { #hashref or a list, either way
10 'action' => 'content.html', # uri for content of popup which should
11 # be suitable for appending keywords
12 'label' => 'click me', # text of <A> tag
13 'prospect_main' => $prospect_main # a FS::prospect_main object
15 #strongly recommended (you want a title, right?)
16 'actionlabel => 'You clicked', # popup title
21 'closetext' => 'Go Away', # the value '' removes the link
25 % if ( $params->{'prospect_main'} ) {
26 <% include('/elements/popup_link.html', $params ) %>\
30 my $params = { 'closetext' => 'Close' };
32 if (ref($_[0]) eq 'HASH') {
33 $params = { %$params, %{ $_[0] } };
35 $params = { %$params, @_ };
38 $params->{'action'} .=
39 ( $params->{'action'} =~ /\?/ ? ';' : '?' ).
40 'prospectnum='. $params->{'prospect_main'}->prospectnum;