2015-01-12 20:31:29 +00:00
|
|
|
<head>
|
|
|
|
^{pageHead wc}
|
|
|
|
|
2015-01-11 07:06:48 +00:00
|
|
|
<nav id="header">
|
2014-08-12 16:14:59 +00:00
|
|
|
<div id="top-nav">
|
|
|
|
<ul id="user-nav">
|
2014-09-21 16:44:11 +00:00
|
|
|
<li>
|
|
|
|
<a href=@{HomeR}>Home
|
2014-12-28 06:12:25 +00:00
|
|
|
$maybe _ <- msu
|
2014-09-14 03:07:20 +00:00
|
|
|
Logged in as <a href=@{UserR username}>#{slug}<br>
|
2014-08-12 16:14:59 +00:00
|
|
|
<li>
|
|
|
|
<a href=@{LogoutR}>Logout
|
2014-08-12 21:45:33 +00:00
|
|
|
<li>
|
2014-08-14 00:24:28 +00:00
|
|
|
<a href=@{NewAlbumR}>Create album
|
2014-08-17 21:01:25 +00:00
|
|
|
<li>
|
|
|
|
<a href=@{UploadR}>Upload image
|
2014-08-12 16:14:59 +00:00
|
|
|
$nothing
|
|
|
|
<li>
|
|
|
|
<a href=@{LoginR}>Login
|
2014-12-14 19:22:50 +00:00
|
|
|
$if block == False
|
|
|
|
<li>
|
|
|
|
<a href=@{SignupR}>Signup
|
2014-08-12 16:14:59 +00:00
|
|
|
|
2014-08-09 18:33:22 +00:00
|
|
|
$maybe msg <- mmsg
|
2015-01-11 07:06:48 +00:00
|
|
|
<div #message>#{msg}
|
|
|
|
|
|
|
|
<div id="main" role="main">
|
|
|
|
^{pageBody wc}
|
|
|
|
<div id="footer">
|
|
|
|
<div class="left">
|
2015-08-24 14:53:04 +00:00
|
|
|
^{pageBody copyrightWidget}
|
2015-08-18 21:57:50 +00:00
|
|
|
<div class="right">
|
|
|
|
$case route
|
|
|
|
$of Just HomeR
|
2015-08-19 04:50:43 +00:00
|
|
|
<head>
|
|
|
|
<link rel="alternate" type="application/atom+xml" title="Root Feed" href=@{RootFeedAtomR}>
|
|
|
|
<link rel="alternate" type="application/rss+xml" title="Root Feed" href=@{RootFeedRssR}>
|
2015-08-18 21:57:50 +00:00
|
|
|
get a Feed from This:
|
2015-08-19 01:48:31 +00:00
|
|
|
<a href="@{RootFeedAtomR}">Atom
|
2015-08-18 21:57:50 +00:00
|
|
|
|
|
2015-08-19 01:48:31 +00:00
|
|
|
<a href="@{RootFeedRssR}">RSS
|
2015-08-18 21:57:50 +00:00
|
|
|
$of Just (PageR _)
|
2015-08-19 04:50:43 +00:00
|
|
|
<head>
|
|
|
|
<link rel="alternate" type="application/atom+xml" title="Root Feed" href=@{RootFeedAtomR}>
|
|
|
|
<link rel="alternate" type="application/rss+xml" title="Root Feed" href=@{RootFeedRssR}>
|
2015-08-18 21:57:50 +00:00
|
|
|
get a Feed from This:
|
2015-08-19 01:48:31 +00:00
|
|
|
<a href="@{RootFeedAtomR}">Atom
|
2015-08-18 21:57:50 +00:00
|
|
|
|
|
2015-08-19 01:48:31 +00:00
|
|
|
<a href="@{RootFeedRssR}">RSS
|
2015-08-18 21:57:50 +00:00
|
|
|
$of Just (ProfileR uId)
|
2015-08-19 04:50:43 +00:00
|
|
|
<head>
|
|
|
|
<link rel="alternate" type="application/atom+xml" title="User Feed" href=@{UserFeedAtomR uId}>
|
|
|
|
<link rel="alternate" type="application/rss+xml" title="User Feed" href=@{UserFeedRssR uId}>
|
2015-08-18 21:57:50 +00:00
|
|
|
get a Feed from This:
|
2015-08-19 01:48:31 +00:00
|
|
|
<a href="@{UserFeedAtomR uId}">Atom
|
2015-08-18 21:57:50 +00:00
|
|
|
|
|
2015-08-19 01:48:31 +00:00
|
|
|
<a href="@{UserFeedRssR uId}">RSS
|
2015-08-18 21:57:50 +00:00
|
|
|
$of Just (UserR name)
|
2015-08-19 04:50:43 +00:00
|
|
|
<head>
|
|
|
|
<link rel="alternate" type="application/atom+xml" title="User Feed" href=@{NameFeedAtomR name}>
|
|
|
|
<link rel="alternate" type="application/rss+xml" title="User Feed" href=@{NameFeedRssR name}>
|
2015-08-18 21:57:50 +00:00
|
|
|
get a Feed from This:
|
2015-08-19 01:48:31 +00:00
|
|
|
<a href="@{NameFeedAtomR name}">Atom
|
2015-08-18 21:57:50 +00:00
|
|
|
|
|
2015-08-19 01:48:31 +00:00
|
|
|
<a href="@{NameFeedRssR name}">RSS
|
2015-08-18 21:57:50 +00:00
|
|
|
$of Just (AlbumR aId)
|
2015-08-19 04:50:43 +00:00
|
|
|
<head>
|
|
|
|
<link rel="alternate" type="application/atom+xml" title="Album Feed" href=@{AlbumFeedAtomR aId}>
|
|
|
|
<link rel="alternate" type="application/rss+xml" title="Album Feed" href=@{AlbumFeedRssR aId}>
|
2015-08-18 21:57:50 +00:00
|
|
|
get a Feed from This:
|
2015-08-19 01:48:31 +00:00
|
|
|
<a href="@{AlbumFeedAtomR aId}">Atom
|
2015-08-18 21:57:50 +00:00
|
|
|
|
|
2015-08-19 01:48:31 +00:00
|
|
|
<a href="@{AlbumFeedRssR aId}">RSS
|
|
|
|
$of Just (MediumR mId)
|
2015-08-19 04:50:43 +00:00
|
|
|
<head>
|
|
|
|
<link rel="alternate" type="application/atom+xml" title="Comment Feed" href=@{CommentFeedAtomR mId}>
|
|
|
|
<link rel="alternate" type="application/rss+xml" title="Comment Feed" href=@{CommentFeedRssR mId}>
|
2015-08-19 01:48:31 +00:00
|
|
|
get a Feed from This:
|
|
|
|
<a href="@{CommentFeedAtomR mId}">Atom
|
|
|
|
|
|
|
|
|
<a href="@{CommentFeedRssR mId}">RSS
|
2015-08-18 21:57:50 +00:00
|
|
|
$of _
|