From a1cee8071f753b80daf374af4bad8458657dd07a Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem.moulin@fripost.org>
Date: Wed, 18 Apr 2012 03:37:55 +0200
Subject: wibble

---
 lib/Fripost/Schema.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'lib/Fripost')

diff --git a/lib/Fripost/Schema.pm b/lib/Fripost/Schema.pm
index 288aa1e..14caccd 100755
--- a/lib/Fripost/Schema.pm
+++ b/lib/Fripost/Schema.pm
@@ -111,6 +111,7 @@ sub passwd {
 
 # Disconnect to the LDAP server.
 sub unbind {
+    $_[0]->_dsay( "Unbinding from the LDAP server." );
     $_[0]->{_ldap}->unbind();
 }
 
@@ -120,7 +121,7 @@ sub _dsay {
     my $self = shift;
     return unless (exists $self->{_options}->{debug})
               and $self->{_options}->{debug};
-    print STDERR "Debug: ";
+    print STDERR "DEBUG: ";
     say STDERR @_;
 }
 
-- 
cgit v1.2.3