From 6c7654d484c09509101da74e0a0edeb1f3825d18 Mon Sep 17 00:00:00 2001
From: Howard Chu <hyc@openldap.org>
Date: Fri, 4 Feb 2011 16:21:10 +0000
Subject: [PATCH] Fix typo from rev 1.15. Apparently nobody has used this
 module since 2007.

---
 servers/slapd/back-perl/SampleLDAP.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/servers/slapd/back-perl/SampleLDAP.pm b/servers/slapd/back-perl/SampleLDAP.pm
index aab2bcccda..0fc4f865c3 100644
--- a/servers/slapd/back-perl/SampleLDAP.pm
+++ b/servers/slapd/back-perl/SampleLDAP.pm
@@ -49,7 +49,7 @@ sub search {
     my ( $base, $scope, $deref, $sizeLim, $timeLim, $filterStr, $attrOnly,
         @attrs )
       = @_;
-    print {*STDERR}, "====$filterStr====\n";
+    print {*STDERR} "====$filterStr====\n";
     $filterStr =~ s/\(|\)//gm;
     $filterStr =~ s/=/: /m;
 
-- 
2.39.5