tdf#91832: ensure GETLINK reports proper contents for reverse selections too

Change-Id: I4e77a55de012b5edd0d922b5e534e4dd6bb714b6
Reviewed-on: https://gerrit.libreoffice.org/28077Reviewed-by: Björn Michaelsen <bjoern.michaelsen@canonical.com>
Tested-by: Björn Michaelsen <bjoern.michaelsen@canonical.com>

sw/source/uibase/shells/textsh.cxx

@@ -664,7 +664,12 @@ void SwTextShell::StateInsert( SfxItemSet &rSet )
 
                         // Get the text of the Link.
                         rSh.StartAction();
+                        const bool bAtEnd(rSh.IsCursorPtAtEnd());
+                        if(!bAtEnd) // tdf#91832: ensure forward selection
+                            rSh.SwapPam();
                         rSh.CreateCursor();
+                        if(!bAtEnd)
+                            rSh.SwapPam();
                         rSh.SwCursorShell::SelectTextAttr(RES_TXTATR_INETFMT,true);
                         OUString sLinkName = rSh.GetSelText();
                         aHLinkItem.SetName(sLinkName);