Add person data access, integ tests, backup/restore (#17)

src/MyWebLog.Domain/PodcastTypes.fs

@@ -414,7 +414,7 @@ type PersonId =
 
     /// <summary>Create a new person ID</summary>
     /// <returns>A new person ID</returns>
-    static member Create =
+    static member Create() =
         Convert.ToBase64String(Guid.NewGuid().ToByteArray()).Replace('/', '_').Replace('+', '-')[..21] |> PersonId
 
     /// <inheritdoc />

src/MyWebLog.Domain/SupportTypes.fs

@@ -88,7 +88,9 @@ type AccessLevel =
     /// <exception cref="InvalidArgumentException">If the string is not valid</exception>
     static member Parse level =
         match level with
+        // Legacy name; superseded by Author on PersonRole
         | "Author" -> ContentAuthor
+        | "ContentAuthor" -> ContentAuthor
         | "Editor" -> Editor
         | "WebLogAdmin" -> WebLogAdmin
         | "Administrator" -> Administrator
@@ -97,7 +99,7 @@ type AccessLevel =
     /// <inheritdoc />
     override this.ToString() =
         match this with
-        | ContentAuthor -> "Author"
+        | ContentAuthor -> "ContentAuthor"
         | Editor -> "Editor"
         | WebLogAdmin -> "WebLogAdmin"
         | Administrator -> "Administrator"