tdf#134420 select neighbour when deleted

Change-Id: I55c6135360d3d77b7b3d2e54012ad82e1a4813ed
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/100086
Tested-by: Jenkins
Reviewed-by: Caolán McNamara <caolanm@redhat.com>
diff --git a/cui/source/tabpages/tpbitmap.cxx b/cui/source/tabpages/tpbitmap.cxx
index 87f2283..c679339 100644
--- a/cui/source/tabpages/tpbitmap.cxx
+++ b/cui/source/tabpages/tpbitmap.cxx
@@ -572,10 +572,14 @@ IMPL_LINK_NOARG(SvxBitmapTabPage, ClickDeleteHdl, SvxPresetListBox*, void)

    if (xQueryBox->run() == RET_YES)
    {
        sal_uInt16 nNextId = m_xBitmapLB->GetItemId(nPos + 1);
        if (!nNextId)
            nNextId = m_xBitmapLB->GetItemId(nPos - 1);

        m_pBitmapList->Remove( static_cast<sal_uInt16>(nPos) );
        m_xBitmapLB->RemoveItem( nId );
        nId = m_xBitmapLB->GetItemId(0);
        m_xBitmapLB->SelectItem( nId );

        m_xBitmapLB->SelectItem(nNextId);

        m_aCtlBitmapPreview.Invalidate();
        ModifyBitmapHdl(m_xBitmapLB.get());