From 2f41dd86c826c3754f49a55a5fd87c5e924417cc Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <code@mail.matthias.benkard.de>
Date: Sun, 14 May 2017 16:43:31 +0200
Subject: Omit empty titles from articles.

---
 mulkcms.lisp           | 2 +-
 templates/article.html | 4 +++-
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/mulkcms.lisp b/mulkcms.lisp
index c4bbc60..5adc7a7 100644
--- a/mulkcms.lisp
+++ b/mulkcms.lisp
@@ -343,7 +343,7 @@
     (list :publishing-date publishing-date
           :revision rid
           :last-updated-date date
-          :title title
+          :title (and (not (equal "" title)) title)
           :body content
           :article-id article
           :global-id global-id
diff --git a/templates/article.html b/templates/article.html
index aed5406..cde94fc 100644
--- a/templates/article.html
+++ b/templates/article.html
@@ -1,6 +1,8 @@
 <article>
 <div class="article">
-  <h1><a href="{link|html-attr-value}">{title}</a></h1>
+  {.section title}
+  <h1><a href="{link|html-attr-value}">{@}</a></h1>
+  {.end}
 
   <div class="article-header">
     <header>
-- 
cgit v1.2.3