diff --git a/mozilla/directory/perldap/Conn.pm b/mozilla/directory/perldap/Conn.pm
index 9db4beb9296..f0df4fbbfec 100644
--- a/mozilla/directory/perldap/Conn.pm
+++ b/mozilla/directory/perldap/Conn.pm
@@ -1,5 +1,5 @@
 #############################################################################
-# $Id: Conn.pm,v 1.18.2.6 1998-09-27 04:37:42 leif%netscape.com Exp $
+# $Id: Conn.pm,v 1.18.2.7 1998-09-29 07:20:29 leif%netscape.com Exp $
 #
 # The contents of this file are subject to the Mozilla Public License
 # Version 1.0 (the "License"); you may not use this file except in
@@ -332,7 +332,7 @@ sub delete
   my $ret = 1;
   my $dn = $id;
 
-  if ($id eq "Mozilla::LDAP::Entry")
+  if (ref($id) eq "Mozilla::LDAP::Entry")
     {
       $dn = $id->getDN();
     }