Fix bug in item item location

2024-09-24 22:29:25 +01:00
parent df80e87427
commit f765b02f2c
6 changed files with 130 additions and 188 deletions
@@ -58,8 +58,8 @@ crUpdateInvidLocations mo crid lw invid itm = lw
    newloc = InInv
        { _ilCrID = crid
        , _ilInvID = invid
-        , _ilIsRoot = Just invid == mo ^? imSelectedItem
-        , _ilIsSelected = Just invid == mo ^? imRootItem
+        , _ilIsRoot = Just invid == mo ^? imRootItem
+        , _ilIsSelected = Just invid == mo ^? imSelectedItem
        , _ilIsAttached = invid `IS.member` (mo ^. imAttachedItems)
        }