diff options
Diffstat (limited to 'lib/CatDap/Controller/admin.pm')
-rw-r--r-- | lib/CatDap/Controller/admin.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/CatDap/Controller/admin.pm b/lib/CatDap/Controller/admin.pm index 7632df4..d44bf71 100644 --- a/lib/CatDap/Controller/admin.pm +++ b/lib/CatDap/Controller/admin.pm @@ -2,7 +2,7 @@ package CatDap::Controller::admin; use Moose; use namespace::autoclean; use Data::UUID; -use Data::Dumper; +#use Data::Dumper; use Net::LDAP::Extension::SetPassword; BEGIN { extends 'Catalyst::Controller'; } @@ -447,7 +447,7 @@ sub account_addoc : Local { if ($haveall) { $entry->add( objectClass => [$objectclass] ); $c->log->debug("About to push updates to $dn"); - $c->log->debug( Dumper( \$entry->changes ) ); + #$c->log->debug( Dumper( \$entry->changes ) ); $mesg = $entry->update; push @errors, $mesg->error if $mesg->code; $c->stash( template => 'admin/account.tt', errors => @errors ); @@ -506,7 +506,7 @@ sub password : Local { # send the mail in the users preferred language my @oldlang = $c->languages; if ($entry->preferredLanguage) { - $c->log->debug("Setting languages to: " . Dumper($entry->preferredLanguage)); + #$c->log->debug("Setting languages to: " . Dumper($entry->preferredLanguage)); $c->languages([$entry->preferredLanguage]); } $c->stash( |