[BUG] Move UITolltip for CompositeHeader somewhere else
Freymaurer opened this issue · 1 comments
Freymaurer commented
[BUG] Move UITolltip for CompositeHeader somewhere else
HLWeil commented
Tests:
let private tests_UIHelper = testList "UIHelper" [
testList "UpdateWithOA" [
let testOntologyAnnotation = OntologyAnnotation("New OA", "NEW", "NEW:00001")
testCase "Term" <| fun _ ->
let cc = CompositeCell.createTermFromString("TestTerm", "TEST", "TEST:00001")
let actual = cc |> UIHelper.CompositeCell.updateWithOA testOntologyAnnotation
let expected = CompositeCell.createTermFromString(testOntologyAnnotation.NameText, testOntologyAnnotation.TermSourceREFString, testOntologyAnnotation.TermAccessionShort)
Expect.equal actual expected ""
testCase "Unitized" <| fun _ ->
let cc = CompositeCell.createUnitizedFromString("12", "TestTerm", "TEST", "TEST:00001")
let actual = cc |> UIHelper.CompositeCell.updateWithOA testOntologyAnnotation
let expected = CompositeCell.createUnitizedFromString("12", testOntologyAnnotation.NameText, testOntologyAnnotation.TermSourceREFString, testOntologyAnnotation.TermAccessionShort)
Expect.equal actual expected ""
testCase "FreeText" <| fun _ ->
let cc = CompositeCell.createFreeText("TestTerm")
let actual = cc |> UIHelper.CompositeCell.updateWithOA testOntologyAnnotation
let expected = CompositeCell.createFreeText(testOntologyAnnotation.NameText)
Expect.equal actual expected ""
]
]