Added meta data for Schreibgebrauch and fixed Metadata parsing for I5
Change-Id: Ib2c9c5cce11c67bb093b2c0aa61449adff69e16e
diff --git a/t/sgbr/sgbr_meta.t b/t/sgbr/sgbr_meta.t
index 8ab6414..50891f8 100644
--- a/t/sgbr/sgbr_meta.t
+++ b/t/sgbr/sgbr_meta.t
@@ -23,6 +23,43 @@
is($doc->doc_sigle, 'TEST_BSP', 'ID-doc');
is($doc->corpus_sigle, 'TEST', 'ID-corpus');
-diag 'TODO: Parse meta';
+is($doc->title, 'Sommerüberraschung', 'title');
+#is($doc->sub_title, 'Beispiel Text Untertitel', 'title');
+#is($doc->pub_date, '20010402', 'Publication date');
+#is($doc->pub_place, 'Mannheim', 'Publication place');
+is($doc->author, 'TEST.BSP.Autoren.1', 'Author');
+is($doc->store('sgbrAuthorAgeClass'), 'X', 'AgeClass');
+is($doc->store('sgbrAuthorSex'), 'M', 'Sex');
+is($doc->store('sgbrKodex'), 'M', 'Kodex');
+
+is($doc->doc_title, 'Beispielkorpus', 'Doc: title');
+is($doc->doc_sub_title, 'Subkorpus Beispieltext', 'Doc: subtitle');
+
+is($doc->language, 'de', 'Language');
+
+ok(!$doc->publisher, 'Publisher');
+ok(!$doc->editor, 'Editor');
+ok(!$doc->text_type, 'Text Type');
+ok(!$doc->text_type_art, 'Text Type Art');
+ok(!$doc->text_type_ref, 'Text Type Ref');
+ok(!$doc->text_column, 'Text Column');
+ok(!$doc->text_domain, 'Text Domain');
+ok(!$doc->creation_date, 'Creation Date');
+ok(!$doc->license, 'License');
+ok(!$doc->pages, 'Pages');
+ok(!$doc->file_edition_statement, 'File Edition Statement');
+ok(!$doc->bibl_edition_statement, 'Bibl Edition Statement');
+ok(!$doc->reference, 'Reference');
+
+ok(!$doc->doc_editor, 'Doc: editor');
+ok(!$doc->doc_author, 'Doc: author');
+
+ok(!$doc->corpus_title, 'Corpus: title');
+ok(!$doc->corpus_sub_title, 'Corpus: subtitle');
+ok(!$doc->corpus_editor, 'Corpus: editor');
+ok(!$doc->corpus_author, 'Corpus: author');
done_testing;
+
+
+__END__