View | Details | Raw Unified | Return to bug 18732
Collapse All | Expand All

(-)a/C4/SMS.pm (-5 / +6 lines)
Lines 89-103 sub send_sms { Link Here
89
    my $driver = exists $params->{'driver'} ? $params->{'driver'} : $self->driver();
89
    my $driver = exists $params->{'driver'} ? $params->{'driver'} : $self->driver();
90
    return unless $driver;
90
    return unless $driver;
91
91
92
93
    my ($sent, $sender);
92
    my ($sent, $sender);
94
93
95
    my $subpath = $driver;
94
    my $subpath = $driver;
96
    $subpath =~ s|::|/|;
95
    $subpath =~ s|::|/|;
97
96
98
    my $conf_file =
97
    my $sms_send_config = C4::Context->config('sms_send_config');
99
      File::Spec->catfile( C4::Context->config('sms_send_config'), $subpath )
98
    my $conf_file = ! defined $sms_send_config ?
100
      . q{.yaml};
99
        $subpath :
100
        File::Spec->catfile( $sms_send_config, $subpath );
101
    $conf_file .= q{.yaml};
102
101
    my %args;
103
    my %args;
102
    if ( -f $conf_file ) {
104
    if ( -f $conf_file ) {
103
        require YAML;
105
        require YAML;
104
- 

Return to bug 18732