format errors the way actual teco does

1 files changed, 1 insertions, 1 deletions

diff --git a/bin/te b/bin/te
index c79222b..fc52c56 100644
--- a/bin/te
+++ b/bin/te
@@ -34,7 +34,7 @@ COMMAND: while (1) {
                 ReadMode 3;
                 local $SIG{INT} = sub { die "interrupted!" };
                 eval { $te->execute($command) };
-                print "ERROR: $@\n" if $@;
+                print "?  $@\n" if $@;
                 ReadMode 4;
                 last KEY;
             }