X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Felements%2Fphonenumber.html;h=854f5846de159dd22b044fb41150308f944fa67e;hb=d6ff3967df6ee08263023a4d35865b66bdb8a672;hp=b1ae2aa2aa661948324c89397a1c87fbfd799d39;hpb=9509e5bfb7f9331303153cac24d7bfecbe2ea9f1;p=freeside.git
diff --git a/httemplate/elements/phonenumber.html b/httemplate/elements/phonenumber.html
index b1ae2aa2a..854f5846d 100644
--- a/httemplate/elements/phonenumber.html
+++ b/httemplate/elements/phonenumber.html
@@ -1,16 +1,67 @@
-
-
-
-
+<% include('/elements/init_overlib.html') %>
% if ( length($number) ) {
- <% $number %>
+ <% $number %>
-% if ( $opt{'callable'} && $curuser->option('vonage-username') ) {
+% if ( $opt{'callable'} ) {
+%
+% if ( $curuser->option('vonage-username') ) {
+%
+% (my $vonage_number = $curuser->option('vonage-fromnumber')) =~ s/\D//g;
+% $vonage_number =~ /^1/ or $vonage_number = "1$vonage_number";
+
+ <% include('/elements/popup_link.html',
+ 'action' =>
+ 'https://secure.click2callu.com/tpcc/makecall'.
+ '?username='. uri_escape($curuser->option('vonage-username')).
+ '&password='. uri_escape($curuser->option('vonage-password')).
+ "&fromnumber=$vonage_number".
+ "&tonumber=$snumber",
+ 'width' => 240,
+ 'height' => 64,
+ 'actionlabel' => 'Initiating call',
+ 'label' => "<$img>",
+ )
+ %>
+
+% } elsif ( $curuser->option('snom-ip') ) {
+%
+% my $host = $curuser->option('snom-ip');
+% if ( $curuser->option('snom-username') ) {
+% my $userpass = uri_escape($curuser->option('snom-username'));
+% $userpass .= ':'. uri_escape($curuser->option('snom-password'))
+% if $curuser->option('snom-password');
+% $host = $userpass.'@'.$host;
+% }
+%
+% $snumber = "1$snumber" unless $snumber =~ /~1/; #NANPA-centric
+
+%# <% include('/elements/popup_link.html',
+%# 'action' => "http://$host/command.htm?number=$snumber",
+%# %link_common,
+%# )
+%# %>
-
+ <<% $img %>>
+
+
+
+% }
+%
% }
%
% } else {
@@ -25,7 +76,6 @@ my( $number, %opt ) = @_;
my $curuser = $FS::CurrentUser::CurrentUser;
-( my $vonage_number = $curuser->option('vonage-fromnumber') ) =~ s/\D//g;
-$vonage_number =~ /^1/ or $vonage_number = "1$vonage_number";
+my $img = qq(IMG SRC="${fsurl}images/red_telephone_mimooh_01.png" BORDER=0 ALT="Call this number");
%init>