Added settings classes for CSS; added Register parsing

HaWeb/Views/Register/Index.cshtml

@@ -1,11 +1,56 @@
 @model RegisterViewModel;
 @using System.Diagnostics;
 
-@foreach (var k in Model.Comments) {
-    <div>@Html.Raw(k.ParsedComment)</div>
-    @if (k.SubComments != null ) {
-        @foreach (var sk in k.SubComments) {
-         <div>@Html.Raw(sk.ParsedComment)</div>
+@* Generated classes by CommentHelper.cs: 
+    - .ha-letlink .ha-wwwlink .ha-reflink: Links to letters, the web, the reference
+    - .ha-lemma: The lemma
+    - .ha-title: Name of something
+    - .ha-reference: Automatically inserted linktext
+    - .ha-commenthead: Class containing the head of a comment, lemma and backlinks
+    - .ha-commentbody: Body of a comment, containing the comments text
+    - .ha-letlinks: Collection of references in the comment within the marginals
+    - .ha-insertedlemma: automatically generated and inserted lemma
+*@
+
+@{
+    var commentClass = Model.Category == "neuzeit" ? "ha-neuzeit" 
+        : Model.Category == "forschung" ? "ha-forschung" 
+        : "ha-bibel";
+}
+
+<div class="ha-register">
+    <div class="@commentClass">
+        <div class="ha-register-head">
+            <h1>@Model.Title</h1>
+            <div class="ha-register-nav" id="ha-register-nav">
+                <div class="ha-register-left-nav">
+                    @if (Model.AvailableCategories != null) {
+                        @foreach (var l in Model.AvailableCategories) {
+                            <a href="@l.Item2">@l.Item1</a>
+                        }
+                    }
+                </div>
+                <div class="ha-register-right-nav">
+                    @if (Model.AvailableSideCategories != null) {
+                        foreach (var l in Model.AvailableSideCategories) {
+                            <a href="@l.Item2">@l.Item1</a>
+                        }
+                    }
+                </div>
+            </div>
+        </div>
+
+        <div class="ha-register-body">
+        @foreach (var k in Model.ParsedComments) {
+            <div class="ha-comment">
+                <div class="ha-headcomment">@Html.Raw(k.ParsedComment)</div>
+                @if (k.ParsedSubComments != null ) {
+                    @foreach (var sk in k.ParsedSubComments) {
+                        <div class="ha-subcomment">@Html.Raw(sk)</div>
+                    }
+                }
+            </div>
         }
-    }
-}
+        </div>
+    </div>
+</div>