use popup_link element for phonenumber.html silly vonage popup

diff --git a/httemplate/elements/phonenumber.html b/httemplate/elements/phonenumber.html
index ffbd8c1..1d62d18 100644 (file)
--- a/httemplate/elements/phonenumber.html
+++ b/httemplate/elements/phonenumber.html
@@ -1,22 +1,40 @@
-%
-%  my( $number, %opt ) = @_;
-%  my $conf = new FS::Conf;
-%  ( my $snumber = $number ) =~ s/\D//g;
-%
+<% include('/elements/init_overlib.html') %>
 
-<SCRIPT TYPE="text/javascript" SRC="<%$fsurl%>elements/overlibmws.js"></SCRIPT>
-<SCRIPT TYPE="text/javascript" SRC="<%$fsurl%>elements/overlibmws_iframe.js"></SCRIPT>
-<SCRIPT TYPE="text/javascript" SRC="<%$fsurl%>elements/overlibmws_draggable.js"></SCRIPT>
-<SCRIPT TYPE="text/javascript" SRC="<%$fsurl%>elements/iframecontentmws.js"></SCRIPT>
 % if ( length($number) ) { 
 
-  <% $number %>
-% if ( $opt{'callable'} && $conf->config('vonage-username') ) { 
+    <% $number %>
 
-      <A HREF="javascript:void(0);" onClick="overlib( OLiframeContent('https://secure.click2callu.com/tpcc/makecall?username=<% $conf->config('vonage-username') %>&password=<% $conf->config('vonage-password') %>&fromnumber=<% $conf->config('vonage-fromnumber')%>&tonumber=1<% $snumber %>', 240, 64, 'call_popup'), CAPTION, 'Initiating call', STICKY, AUTOSTATUSCAP, CLOSECLICK, DRAGGABLE, WIDTH, 240, HEIGHT, 64 ); return false;" TITLE="Call this number"><IMG SRC="<%$fsurl%>images/red_telephone_mimooh_01.png" BORDER=0 ALT="Call this number"></A>
-% } 
+%   if ( $opt{'callable'} && $conf->config('vonage-username') ) { 
+
+      <% include('/elements/popup_link.html',
+           'action'      =>
+             'https://secure.click2callu.com/tpcc/makecall'.
+             '?username='. $conf->config('vonage-username').
+             '&password='. $conf->config('vonage-password').
+             "&fromnumber=$vonage_number".
+             "&tonumber=$snumber",
+           'width'       => 240,
+           'height'      => 64,
+           'actionlabel' => 'Initiating call',
+           'label'       => qq!<IMG SRC="${fsurl}images/red_telephone_mimooh_01.png" BORDER=0 ALT="Call this number">!,
+         )
+      %>
+
+%   } 
+%
 % } else { 
 
   &nbsp;
+
 % } 
+<%init>
+
+my( $number, %opt ) = @_;
+( my $snumber = $number ) =~ s/\D//g;
+
+my $conf = new FS::Conf;
+
+( my $vonage_number = $conf->config('vonage-fromnumber') ) =~ s/\D//g;
+$vonage_number =~ /^1/ or $vonage_number = "1$vonage_number";
 
+</%init>