rmv RectifyTerms from spreadsheet update

nfdi4plants · Oct 9, 2024 · 979eaa1 · 979eaa1
1 parent 57f58bc
commit 979eaa1
Show file tree

Hide file tree

Showing 3 changed files with 0 additions and 28 deletions.
diff --git a/src/Client/States/Spreadsheet.fs b/src/Client/States/Spreadsheet.fs
@@ -188,7 +188,6 @@ type Msg =
 | InitFromArcFile of ArcFiles
 | InsertOntologyAnnotation of OntologyAnnotation
 | InsertOntologyAnnotations of OntologyAnnotation []
-| RectifyTermColumns
 | UpdateTermColumnsResponse of TermTypes.TermSearchable []
 /// Starts chain to export active table to isa json
 | ExportJson of ArcFiles * JsonExportFormat

diff --git a/src/Client/Update/InterfaceUpdate.fs b/src/Client/Update/InterfaceUpdate.fs
@@ -272,9 +272,6 @@ module Interface =
                 | Some Swatehost.Excel ->
                     let cmd = OfficeInterop.RectifyTermColumns |> OfficeInteropMsg |> Cmd.ofMsg
                     model, cmd
-                | Some Swatehost.Browser | Some Swatehost.ARCitect ->
-                    let cmd = Spreadsheet.RectifyTermColumns |> SpreadsheetMsg |> Cmd.ofMsg
-                    model, cmd
                 | _ -> failwith "not implemented"
             | UpdateTermColumnsResponse terms ->
                 match host with

diff --git a/src/Client/Update/SpreadsheetUpdate.fs b/src/Client/Update/SpreadsheetUpdate.fs
@@ -376,30 +376,6 @@ module Spreadsheet =
             | ExportXlsxDownload (name,xlsxBytes) ->
                 let _ = Helper.download (name ,xlsxBytes)
                 state, model, Cmd.none
-            | RectifyTermColumns ->
-                //let getUpdateTermColumns() = promise {
-                //    return Controller.getUpdateTermColumns state
-                //}
-                //let cmd =
-                //    Cmd.OfPromise.either
-                //        getUpdateTermColumns
-                //        ()
-                //        (fun (searchTerms,deprecationLogs) ->
-                //            // Push possible deprecation messages by piping through "GenericInteropLogs"
-                //            Messages.GenericInteropLogs (
-                //                // This will be executed after "deprecationLogs" are handled by "GenericInteropLogs"
-                //                Messages.SearchForInsertTermsRequest searchTerms |> Messages.Request |> Messages.Api |> Cmd.ofMsg,
-                //                // This will be pushed to Activity logs, or as wanring modal to user in case of LogIdentifier.Warning
-                //                deprecationLogs
-                //            )
-                //            |> Messages.DevMsg
-                //        )
-                //        (Messages.curry Messages.GenericError (OfficeInterop.UpdateFillHiddenColsState OfficeInterop.FillHiddenColsState.Inactive |> OfficeInteropMsg |> Cmd.ofMsg) >> DevMsg)
-                //let stateCmd = OfficeInterop.UpdateFillHiddenColsState OfficeInterop.FillHiddenColsState.ExcelCheckHiddenCols |> OfficeInteropMsg |> Cmd.ofMsg
-                //let cmds = Cmd.batch [cmd; stateCmd]
-                //state, model, cmds
-                failwith "UpdateTermColumns is not implemented yet"
-                state, model, Cmd.none
             | UpdateTermColumnsResponse terms ->
                 //let nextExcelState = {
                 //    model.ExcelState with