make file picker more robust 🐛

nfdi4plants · Oct 9, 2024 · e72634a · e72634a
1 parent 866f4c2
commit e72634a
Showing 1 changed file with 6 additions and 4 deletions.
diff --git a/src/Client/Update/InterfaceUpdate.fs b/src/Client/Update/InterfaceUpdate.fs
@@ -214,10 +214,12 @@ module Interface =
                         let mutable rowIndex = rowIndex
                         let cells = [|
                             for name in fileNames do
-                                let c0 = model.SpreadsheetModel.ActiveTable.TryGetCellAt(columnIndex,rowIndex).Value
-                                let cell = c0.UpdateMainField name
-                                (columnIndex, rowIndex), cell
-                                rowIndex <- rowIndex + 1
+                                match model.SpreadsheetModel.ActiveTable.TryGetCellAt(columnIndex,rowIndex) with
+                                | Some c ->
+                                    let cell = c.UpdateMainField name
+                                    (columnIndex, rowIndex), cell
+                                    rowIndex <- rowIndex + 1
+                                | None -> ()
                         |]
                         let cmd = Spreadsheet.UpdateCells cells |> SpreadsheetMsg |> Cmd.ofMsg
                         model, cmd