# HG changeset patch
# User HackEso <hackeso@esolangs.org>
# Date 1534850499 0
# Node ID 6177c1938da6d8469f719e8ca5b522dfb0d03313
# Parent  850795428cd065cb49bf473870d3a1f30a205190
<oerjan> revert

diff -r 850795428cd0 -r 6177c1938da6 bin/toroman
--- a/bin/toroman	Tue Aug 21 11:21:21 2018 +0000
+++ b/bin/toroman	Tue Aug 21 11:21:39 2018 +0000
@@ -1,2 +1,2 @@
 #!/usr/bin/perl
-sub k{my$t;$t=~y/IVXLCDM/XLCDMEE/,$t.=("",I,II,III,IV,V,VI,VII,VIII,IX)[$_]for/./g;$t~s/.*E.*/Number too large;/$t}$_=(shift=~/(\w+)/)[0];print k,$/
+sub k{my$t;$t=~y/IVXLCDM/XLCDMEE/,$t.=("",I,II,III,IV,V,VI,VII,VIII,IX)[$_]for/./g;$t}$_=(shift=~/(\w+)/)[0];print k,$/