Fixed import bug when reordering loot sources.

thommcgrath · Mar 26, 2018 · 173f8db · 173f8db
1 parent 73571d3
commit 173f8db
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Project/Data Model/LocalData.xojo_code b/Project/Data Model/LocalData.xojo_code
@@ -369,7 +369,7 @@ Implements Beacon.DataSource
 		      Dim UseBlueprints As Boolean = (Dict.Value("use_blueprints") = 1)
 		      Dim RequiredItemSets As Integer = Dict.Lookup("required_item_sets", 1)
 
-		      Self.SQLExecute("DELETE FROM loot_sources WHERE LOWER(class_string) = LOWER(?1);", ClassString)
+		      Self.SQLExecute("DELETE FROM loot_sources WHERE LOWER(class_string) = LOWER(?1) OR sort = ?2;", ClassString, SortValue)
 		      Self.SQLExecute("INSERT INTO loot_sources (class_string, label, kind, engram_mask, multiplier_min, multiplier_max, uicolor, icon, sort, use_blueprints, required_item_sets) VALUES (?1, ?2, ?3, ?4, ?5, ?6, ?7, ?8, ?9, ?10, ?11);", ClassString, Label, Kind, Availability, MultMin, MultMax, UIColor, DecodeHex(IconHex), SortValue, UseBlueprints, RequiredItemSets)
 		    Next