From ec283da1f9eb5574ace9f827dc811be8a6c48e47 Mon Sep 17 00:00:00 2001
From: "Jan \"Yenya\" Kasprzak" <kas@fi.muni.cz>
Date: Mon, 2 Jan 2023 08:02:30 +0100
Subject: [PATCH] AoC::Task: restore $/ before prompting user

---
 lib/Y/AoC/Task.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/Y/AoC/Task.pm b/lib/Y/AoC/Task.pm
index ec7c4a2..cc1cddd 100644
--- a/lib/Y/AoC/Task.pm
+++ b/lib/Y/AoC/Task.pm
@@ -58,6 +58,7 @@ sub try_submit($part, @msg) {
 	print "\nSubmit $url\nlevel=", white($part), ' answer=',
 		white($ans), ' ? [Enter]/[Ctrl-C]: ';
 	
+	local $/ = "\n";
 	scalar <STDIN>;
 	eval '{
 		local $SIG{__DIE__};
-- 
2.43.0