X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=mTaskInterpret.icl;h=d88c3180853244062b0ca6ff268cc5edf8f57133;hb=2520cfc83a29d273b17441c5cdf411f1182bbb62;hp=cbf06c03d7fb88237fc3bd884df064021edfdb79;hpb=64f379e7446a716257f6030157f2cb254200aa7b;p=mTask.git

diff --git a/mTaskInterpret.icl b/mTaskInterpret.icl
index cbf06c0..d88c318 100644
--- a/mTaskInterpret.icl
+++ b/mTaskInterpret.icl
@@ -35,7 +35,7 @@ decode x
 	'\n' = MTEmpty
 	'm' = MTMessage x
 	'u' = MTPub (from16bit (x % (1,3))) (x % (3,5))
-	_ = abort ("Didn't understand message: " +++ join " " [toString (toInt c)\\c<-: x] +++ "\n")
+	_ = MTMessage x//abort ("Didn't understand message: " +++ join " " [toString (toInt c)\\c<-: x] +++ "\n")
 
 safePrint :== toString o toJSON