fix bugs, add test for mergeDataEntries

Author: dehann

src/DataBlobs/services/AbstractDataEntries.jl

@@ -190,7 +190,10 @@ function mergeDataEntries!(
     bllb::Union{Symbol, UUID, <:AbstractString, Regex}
 )
     #
-    des = getDataEntry(src, slbl, bllb)
+    _makevec(s) = [s;]
+    _makevec(s::AbstractVector) = s
+    des_ = getDataEntry(src, slbl, bllb)
+    des = _makevec(des_)
     # don't add data entries that already exist 
     dde = listDataEntries(dst, dlbl)
     uids = (s->s.id).(dde)

test/consol_DataEntryBlobTests.jl

@@ -45,8 +45,23 @@ ade3,adb3 = updateData!(dfg, :x2, deepcopy(ade))
 @test ade == ade2 == ade3
 @test adb == adb2 == adb3
 
+
+@test :random in listDataEntries(dfg, :x2)
+@test length(listDataEntries(dfg, :x1)) === 0
+@test length(listDataEntries(dfg, :x2)) === 1
+
+mergeDataEntries!(dfg, :x1, dfg, :x2, :random)
+
+@test length(listDataEntries(dfg, :x1)) === 1
+@test :random in listDataEntries(dfg, :x1)
+@test length(listDataEntries(dfg, :x2)) === 1
+
+deleteData!(dfg, :x1, :random)
 deleteData!(dfg, :x2, :random)
 
+@test length(listDataEntries(dfg, :x1)) === 0
+@test length(listDataEntries(dfg, :x2)) === 0
+
 ##==============================================================================
 ## FileDataEntry
 ##==============================================================================