tradlit: missalemeum 1962 propers -> sections

1 files changed, 35 insertions, 0 deletions

diff --git a/internal/tradlit/parse_test.go b/internal/tradlit/parse_test.go
new file mode 100644
index 0000000..a7344cd
--- /dev/null
+++ b/internal/tradlit/parse_test.go
@@ -0,0 +1,35 @@
+package tradlit
+
+import (
+	"os"
+	"testing"
+)
+
+func TestParse(t *testing.T) {
+	body, err := os.ReadFile("testdata/2026-07-22.json")
+	if err != nil {
+		t.Fatal(err)
+	}
+	secs, err := Parse(body)
+	if err != nil {
+		t.Fatal(err)
+	}
+	var gospel, epistle bool
+	for _, s := range secs {
+		if s.PartID == "evangelium" {
+			gospel = true
+			if s.Citation != "Luke 7:36-50" {
+				t.Errorf("gospel citation = %q", s.Citation)
+			}
+			if len(s.Paragraphs) == 0 {
+				t.Error("gospel has no vernacular text")
+			}
+		}
+		if s.PartID == "lectio" {
+			epistle = true
+		}
+	}
+	if !gospel || !epistle {
+		t.Errorf("missing parts: gospel=%v epistle=%v", gospel, epistle)
+	}
+}