Renamed to: Uni2work

src/Foundation.hs

@@ -569,7 +569,7 @@ instance Yesod UniWorX where
 -- Define breadcrumbs.
 instance YesodBreadcrumbs UniWorX where
   breadcrumb (AuthR _)        = return ("Login"   , Just HomeR)
-  breadcrumb HomeR            = return ("UniWorkY", Nothing)
+  breadcrumb HomeR            = return ("Uni2work", Nothing)
   breadcrumb UsersR           = return ("Benutzer", Just HomeR)
   breadcrumb AdminTestR       = return ("Test"    , Just HomeR)
   breadcrumb (AdminUserR _)   = return ("Users"   , Just UsersR)
@@ -601,7 +601,7 @@ instance YesodBreadcrumbs UniWorX where
   -- Deprecated below
   breadcrumb SubmissionListR = return ("Abgaben", Just HomeR)
   -- Others
-  breadcrumb  _ = return ("UniWorkY", Nothing) -- Default is no breadcrumb at all
+  breadcrumb  _ = return ("Uni2work", Nothing) -- Default is no breadcrumb at all
 
 pageActions :: Route UniWorX -> [MenuTypes]
 pageActions (CourseR tid csh CShowR) =

src/Handler/Admin.hs

@@ -46,7 +46,7 @@ getAdminTestR :: Handler Html -- Demo Page. Referenzimplementierungen sollte hie
 getAdminTestR = do
   (btnWdgt, btnEnctype) <- generateFormPost (buttonForm :: Form CreateButton)
   defaultLayout $ do
-    -- setTitle "UniWorkY Admin Testpage"
+    -- setTitle "Uni2work Admin Testpage"
     $(widgetFile "adminTest")
 
 postAdminTestR :: Handler Html

src/Handler/Home.hs

@@ -169,6 +169,6 @@ homeUser uid = do
     }
 
   defaultLayout $ do
-    -- setTitle "Willkommen zum Uniworky Test!"
+    -- setTitle "Willkommen zum Uni2work Test!"
     $(widgetFile "homeUser")
     $(widgetFile "dsgvDisclaimer")

src/Model/Types.hs

@@ -236,6 +236,11 @@ instance Read Theme where -- generic Read-Instance for Show/Bounded
     | (Just t) <- (Map.lookup s readTheme) = [(t,"")]
     | otherwise = [(Default,"")] -- read shall always succeed
 
+{-
+instance Default Theme where
+  def = Default
+-}
+
 derivePersistField "Theme"
 
 

templates/adminTest.hamlet

@@ -1,7 +1,7 @@
 <div .alerts>
     <div .alert>
       <div .alert__content>
-        UniWorkY ist noch nicht abgeschlossen.
+        Uni2work ist noch nicht abgeschlossen.
     <div .alert .alert-success>
       <div .alert__content>
         Die Korrektoren wurden aktualisiert! (.alert-success)
@@ -15,7 +15,7 @@
         Nicht so gut! Egal was das war. Es hat mir nicht gefallen! (.alert-error)
 
 <div .container>
-  <h1>Uniworky - Admin Demopage
+  <h1>Uni2work - Admin Demopage
 
   <p data-tooltip="Solch ein Tooltip kann mit dem <em>data-tooltip</em> Attribut erzeugt werden. Funktioniert aber nur in Block-Elementen die einen sinnvollen Wrapper haben.">
     Diese interne Seite dient lediglich zum Testen diverser Funktionalitäten

templates/home.hamlet

@@ -7,7 +7,7 @@
       <div .alert__content>
         Vorabversion!
         Die Implementierung von
-        UniWorkY ist noch nicht abgeschlossen.
+        Uni2work ist noch nicht abgeschlossen.
 
   <h1>Kurse mit offener Registrierung
     <div .container>

templates/homeUser.hamlet

@@ -7,7 +7,7 @@
       <div .alert__content>
         Vorabversion!
         Die Implementierung von
-        UniWorkY ist noch nicht abgeschlossen.
+        Uni2work ist noch nicht abgeschlossen.
 
   <h1>Anstehende Übungsblätter
     <div .container>

templates/widgets/navbar.lucius

@@ -49,7 +49,7 @@
   }
 
   &::before {
-    content: 'UniWorkY';
+    content: 'Uni2work';
     font-family: var(--font-logo);
     font-size: 42px;
     font-weight: bold;