tdf#125520 Fix OLE objects drag&drop with 'Insert as Copy'

Change-Id: Ia4e6038c95d1388bdf7f9984b7cf4a69aead87a1
Reviewed-on: https://gerrit.libreoffice.org/73026
Tested-by: Jenkins
Reviewed-by: Thorsten Behrens <Thorsten.Behrens@CIB.de>
diff --git a/svx/source/svdraw/svdxcgv.cxx b/svx/source/svdraw/svdxcgv.cxx
index 31d4cf2..a65d38c 100644
--- a/svx/source/svdraw/svdxcgv.cxx
+++ b/svx/source/svdraw/svdxcgv.cxx
@@ -743,8 +743,17 @@

        if(nullptr == pNewObj)
        {
            // not cloned yet, use default way
            pNewObj = pObj->CloneSdrObject(*pNewModel);
            // not cloned yet
            if (pObj->GetObjIdentifier() == OBJ_OLE2)
            {
                // tdf#125520
                pNewObj = pObj->CloneSdrObject(pObj->getSdrModelFromSdrObject());
            }
            else
            {
                // use default way
                pNewObj = pObj->CloneSdrObject(*pNewModel);
            }
        }

        if(pNewObj)