diff --git a/basctl/source/basicide/moduldlg.cxx b/basctl/source/basicide/moduldlg.cxx
index 9df40f8d8556..299e6acebffa 100644
--- a/basctl/source/basicide/moduldlg.cxx
+++ b/basctl/source/basicide/moduldlg.cxx
@@ -336,7 +336,7 @@ private:
         {
             std::unique_ptr<weld::TreeIter> xParent(pSource->make_iterator(xEntry.get()));
             std::unique_ptr<weld::TreeIter> xSelParent(pSource->make_iterator(xSelected.get()));
-            if (pSource->iter_parent(*xParent) && pSource->iter_parent(*xSelParent) && pSource->iter_compare(*xParent, *xSelParent) == 0)
+            if (pSource->iter_parent(*xParent) && pSource->iter_parent(*xSelParent) && xParent->equal(*xSelParent))
                 bValid = false;
         }