From 43b46b17fc1d12170549702206bc0060f5f8c265 Mon Sep 17 00:00:00 2001
From: Joris
Date: Fri, 5 Jan 2024 21:21:24 +0100
Subject: Add Here’s to you Nicola and Bart from Joan Baez

---
 src/main.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/main.lisp b/src/main.lisp
index 2d3007e..51a7cbb 100644
--- a/src/main.lisp
+++ b/src/main.lisp
@@ -151,7 +151,7 @@
       (if (member c cs) (h "emph" nil (list (make-string 1 :initial-element c))) (make-string 1 :initial-element c)))))
 
 (defun lyrics-line (line)
-  (h "div" nil (list (emph line (list #\, #\. #\? #\!)))))
+  (h "div" nil (list (emph line (list #\, #\. #\? #\! #\-)))))
 
 (defun lyrics-section (s)
   (let ((p (car (cdr s))))
-- 
cgit v1.2.3