Add framework for SQLite data tests

2024-01-21 14:26:02 -05:00
parent ffe6713b5e
commit 1345074c71
7 changed files with 88 additions and 6 deletions
--- a/src/MyWebLog/Maintenance.fs
+++ b/src/MyWebLog/Maintenance.fs
@@ -395,7 +395,7 @@ module Backup =
    }
    
    /// Decide whether to restore a backup
-    let private restoreBackup fileName newUrlBase promptForOverwrite data = task {
+    let internal restoreBackup fileName newUrlBase promptForOverwrite data = task {
        
        let serializer = getSerializer false
        use stream     = new FileStream(fileName, FileMode.Open)