From: Steinar H. Gunderson <sgunderson@bigfoot.com>
Date: Wed, 15 Jul 2020 17:28:20 +0000 (+0200)
Subject: Add an upload link when adding an event.
X-Git-Url: https://git.sesse.net/?p=pr0n;a=commitdiff_plain;h=3f789026ecaffce025b7598a26a8975be132cc96

Add an upload link when adding an event.
---

diff --git a/perl/Sesse/pr0n/NewEvent.pm b/perl/Sesse/pr0n/NewEvent.pm
index 8f4d6ce..64a2f3e 100644
--- a/perl/Sesse/pr0n/NewEvent.pm
+++ b/perl/Sesse/pr0n/NewEvent.pm
@@ -26,7 +26,7 @@ sub handler {
 		}
 		$io->print("    <p>Rett opp i feilene over før du går videre.</p>\n");
 	} else {
-		$io->print("    <p>Hendelsen '$id' lagt til.</p>");
+		$io->print("    <p>Hendelsen '<a href=\"/upload/$id/\">$id</a>' lagt til.</p>");
 	}
 	
 	Sesse::pr0n::Common::footer($r, $io);