t/cti/call_link.t

   1 use Test::More tests => 17;
   2
   3 use strict;
   4 use lib 't';
   5 use utf8;
   6
   7 use_ok 'SL::CTI';
   8
   9 $::lx_office_conf{cti}->{international_dialing_prefix} = '00';
  10 $::lx_office_conf{cti}->{dial_command}                 = 'dummy';
  11
  12 is SL::CTI->call_link(number => '0371 5347 620'),        'controller.pl?action=CTI/call&number=03715347620';
  13 is SL::CTI->call_link(number => '0049(0)421-22232 22'),  'controller.pl?action=CTI/call&number=00494212223222';
  14 is SL::CTI->call_link(number => '+49(0)421-22232 22'),   'controller.pl?action=CTI/call&number=00494212223222';
  15 is SL::CTI->call_link(number => 'Tel: +49 40 809064 0'), 'controller.pl?action=CTI/call&number=0049408090640';
  16
  17 is SL::CTI->call_link(number => '0371 5347 620',        internal => 1), 'controller.pl?action=CTI/call&number=03715347620&internal=1';
  18 is SL::CTI->call_link(number => '0049(0)421-22232 22',  internal => 1), 'controller.pl?action=CTI/call&number=00494212223222&internal=1';
  19 is SL::CTI->call_link(number => '+49(0)421-22232 22',   internal => 1), 'controller.pl?action=CTI/call&number=00494212223222&internal=1';
  20 is SL::CTI->call_link(number => 'Tel: +49 40 809064 0', internal => 1), 'controller.pl?action=CTI/call&number=0049408090640&internal=1';
  21
  22 $::lx_office_conf{cti}->{dial_command} = '';
  23
  24 is SL::CTI->call_link(number => '0371 5347 620'),        'callto://03715347620';
  25 is SL::CTI->call_link(number => '0049(0)421-22232 22'),  'callto://00494212223222';
  26 is SL::CTI->call_link(number => '+49(0)421-22232 22'),   'callto://00494212223222';
  27 is SL::CTI->call_link(number => 'Tel: +49 40 809064 0'), 'callto://0049408090640';
  28
  29 is SL::CTI->call_link(number => '0371 5347 620',        internal => 1), 'callto://03715347620';
  30 is SL::CTI->call_link(number => '0049(0)421-22232 22',  internal => 1), 'callto://00494212223222';
  31 is SL::CTI->call_link(number => '+49(0)421-22232 22',   internal => 1), 'callto://00494212223222';
  32 is SL::CTI->call_link(number => 'Tel: +49 40 809064 0', internal => 1), 'callto://0049408090640';