From ffb69e73586fedb22c5c7d9868ef7a73acc841d8 Mon Sep 17 00:00:00 2001
From: SJost <jost@tcs.ifi.lmu.de>
Date: Tue, 18 Sep 2018 15:09:20 +0200
Subject: [PATCH] Minor code cleaning

---
 src/Utils.hs                    | 2 ++
 templates/default-layout.hamlet | 3 +--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/Utils.hs b/src/Utils.hs
index 692fdbdee..c15a0c29a 100644
--- a/src/Utils.hs
+++ b/src/Utils.hs
@@ -197,6 +197,8 @@ stepTextCounter text
     number = takeWhileEnd isDigit $ dropWhileEnd (not . isDigit) text
     prefix = dropWhileEnd isDigit $ dropWhileEnd (not . isDigit) text
 
+-- Data.Text.groupBy ((==) `on` isDigit) $ Data.Text.pack "12.ProMo  Ue3bung00322 34 (H)"
+-- ["12",".ProMo  Ue","3","bung","00322"," ","34"," (H)"]
 
 
 ------------
diff --git a/templates/default-layout.hamlet b/templates/default-layout.hamlet
index e21813363..788577105 100644
--- a/templates/default-layout.hamlet
+++ b/templates/default-layout.hamlet
@@ -16,8 +16,7 @@
 
       <h1>
         <!-- $maybe back <- lastMaybe parents
-            <a .breadcrumbs__link href="@{fst back}">#{snd back}
-          -->
+            <a .breadcrumbs__link href="@{fst back}">#{snd back}  -->
         $maybe headline <- contentHeadline
           ^{headline}
         $nothing