link to edit page from list page

frontend/app/Route.hs

@@ -1,6 +1,7 @@
 module Route
   ( Route (..),
     parseURI,
+    routeToString,
   )
 where
 
@@ -32,3 +33,8 @@ parseURI uri =
           <* P.endOfInput
       )
       (T.pack uri.uriFragment)
+
+routeToString :: Route -> String
+routeToString Home = "#"
+routeToString (ListCollection collection) = "#collection/" <> collection
+routeToString (EditValue collection fileName) = "#collection/" <> collection <> "/" <> fileName