Include the comment ID in a comment notification e-mail message.

Ignore-this: 16401dc3783984a3fb43262d8fe6be8c

darcs-hash:f75242b42f78685e1ead7c730f0f77957217b68e

1 files changed, 2 insertions, 0 deletions

diff --git a/utils.lisp b/utils.lisp
index e111231..877343e 100644
--- a/utils.lisp
+++ b/utils.lisp
@@ -311,6 +311,7 @@ ELEMENT-TYPE as the stream's."
   (mail address
         (format nil "[Kommentar] ~A" (title-of entry))
         (format nil "~&Kommentar von: ~A~
+                     ~&Nummer: ~A~
                      ~&E-Mail: ~A~
                      ~&Website: ~A~
                      ~&IP-Adresse: ~A~
@@ -319,6 +320,7 @@ ELEMENT-TYPE as the stream's."
                      ~&~%~
                      ~&~A"
                 (author-of comment)
+                (id-of comment)
                 (email-of comment)
                 (website-of comment)
                 (submitter-ip comment)