Silence "unused variable" warning

diff --git a/servers/slapd/back-perl/compare.c b/servers/slapd/back-perl/compare.c
index 75ade4a965105621ee06793e2653fbbb1a589bbe..f28605f62737d37c423fe1f56ceb3dd6e36e941f 100644 (file)
--- a/servers/slapd/back-perl/compare.c
+++ b/servers/slapd/back-perl/compare.c
@@ -30,7 +30,7 @@ perl_back_compare(
        SlapReply       *rs )
 {
        int count;
-       char *avastr, *ptr;
+       char *avastr;
 
        PerlBackend *perl_back = (PerlBackend *)op->o_bd->be_private;