Commit 2a03ce35 authored by Bill MacAllister's avatar Bill MacAllister
Browse files

Add in missing use statement for Sys::Syslog

parent d1b81776
......@@ -25,6 +25,7 @@ use Wallet::Kadmin ();
use Authen::SASL ();
use Net::LDAP;
use IPC::Run qw( run timeout );
use Sys::Syslog qw( :standard :macros );
@ISA = qw(Wallet::Kadmin);
......@@ -146,7 +147,7 @@ sub msktutil {
my @cmd = ($Wallet::Config::AD_MSKTUTIL);
push @cmd, @args;
if ($Wallet::Config::AD_DEBUG) {
$self->ad_debug(LOG_DEBUG, join(' ', @cmd));
$self->ad_debug('debug', join(' ', @cmd));
}
my $in;
......@@ -176,7 +177,7 @@ sub msktutil {
}
}
if ($Wallet::Config::AD_DEBUG) {
$self->ad_debug(LOG_DEBUG, $out);
$self->ad_debug('debug', $out);
}
return $out;
}
......@@ -294,7 +295,7 @@ sub create {
}
if ($self->exists($principal)) {
if ($Wallet::Config::AD_DEBUG) {
$self->ad_debug(LOG_DEBUG, "$principal exists");
$self->ad_debug('debug', "$principal exists");
}
return 1;
}
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment