纠正 ConTeXt 中跨方向边界不一致的图像位置？

Question

我拥有一系列使用多种语言自动生成的文档，其中包括 LTR 和 RTL 语言的混合。我正在尝试提出一种可以在两个方向上工作的通用标记。我在对齐图像时遇到了一些麻烦。当我在行首换行时，LTR 版本可以正确换行，但 RTL 版本会将图像放到边距中。

我该如何纠正图像的位置，以便 LTR 和 RTL 变体都能将文本环绕在图像周围？

\enableregime[utf]
\setuppapersize [A5]
\setuplayout[width=fit,topspace=0pt,bottomspace=0pt,header=0pt]
\starttypescript [sans] [notolatin]
    \definefontsynonym [Sans] [name:notosans]
    \definefontsynonym [SansBold] [name:notosansbold]
    \definefontsynonym [SansItalic] [name:notosansitalic]
    \definefontsynonym [SansBoldItalic] [name:notosansbolditalic]
\stoptypescript
\starttypescript [sans] [notoarabic]
    \definefontfeature[persian][mode=node,language=dflt,script=arab,init=yes,medi=yes,fina=yes,isol=yes,calt=yes,rlig=yes,tlig=yes,trep=yes,curs=yes,kern=yes,mark=yes]
    \definefontsynonym [Sans] [name:notonaskharabic] [range=persian,features=persian]
    \definefontsynonym [SansBold] [name:notonaskharabicbold]
    \definefontsynonym [SansItalic] [name:notonaskharabicitalic]
    \definefontsynonym [SansBoldItalic] [name:notonaskharabicbolditalic]
\stoptypescript
\definetypeface [notolatin] [ss] [sans] [notolatin]
\definetypeface [notoarabic] [ss] [sans] [notoarabic]
\define\EN{\setupbodyfont[notolatin,ss]\pardir TLT \textdir TLT}
\define\PE{\setupbodyfont[notoarabic,ss]\pardir TRT \textdir TRT}
\starttext
\pagedir TRT
\bodydir TRT
\PE
هناك حقيقة مثبتة منذ زمن طويل وهي أن المحتوى المقروء لصفحة ما سيلهي القارئ عن التركيز على الشكل الخارجي للنص أو شكل توضع الفقرات في الصفحة التي يقرأها.

\setuphanging[location=left]
\starthanging{\externalfigure[https://api.unfoldingword.org/obs/jpg/1/checkinglevels/uW-Level1-128px.png]}
{
    {\PE \bf ۱.آفرینش}
    \blank
    {\PE \em داستانی برگرفته از کتاب مقدّس: کتاب پیدایش، فصلهای ۱و۲}
}
\stophanging

\pagedir TLT
\bodydir TLT
\EN
Lorem ipsum dolor sit amet, consectetur adipiscing elit. Donec a diam lectus. Sed sit amet ipsum mauris. Maecenas congue ligula ac quam viverra nec consectetur ante hendrerit.

\setuphanging[location=left]
\starthanging{\externalfigure[https://api.unfoldingword.org/obs/jpg/1/checkinglevels/uW-Level1-128px.png]}
{
    {\EN \bf Checking level 1}
    \blank
    {\EN \em find out more at https://unfoldingword.org/quality}
}
\stophanging
\stoptext