Rework content commands, add audio player

CHDataManagement/Views/Pages/PageDetailView.swift

@@ -62,6 +62,13 @@ struct PageDetailView: View {
                 }
                 .padding(.bottom)
 
+                Text("External url")
+                    .font(.headline)
+                OptionalTextField("", text: $page.externalLink,
+                                  prompt: "External url")
+                    .textFieldStyle(.roundedBorder)
+                .padding(.bottom)
+
                 HStack {
                     Text("Draft")
                         .font(.headline)
@@ -120,19 +127,20 @@ struct PageDetailView: View {
             return
         }
         isGeneratingWebsite = true
-        print("Generating page")
         DispatchQueue.global(qos: .userInitiated).async {
+            var success = true
             for language in ContentLanguage.allCases {
                 let generator = LocalizedWebsiteGenerator(
                     content: content,
                     language: language)
                 if !generator.generate(page: page) {
                     print("Generation failed")
+                    success = false
                 }
             }
             DispatchQueue.main.async {
                 isGeneratingWebsite = false
-                print("Done")
+                didGenerateWebsite = success
             }
         }
     }