MonetDB: Aug2011 - Mapi: eat leading protocol bang for errors

[Fabian Groffen]

Changeset: 4e5e275465f7 for MonetDB
URL: http://dev.monetdb.org/hg/MonetDB?cmd=changeset;node=4e5e275465f7
Modified Files:
        clients/perl/Mapi.pm
Branch: Aug2011
Log Message:

Mapi: eat leading protocol bang for errors


diffs (11 lines):

diff --git a/clients/perl/Mapi.pm b/clients/perl/Mapi.pm
--- a/clients/perl/Mapi.pm
+++ b/clients/perl/Mapi.pm
@@ -209,6 +209,7 @@
   my ($self,$line) = @_;
   my $err = $self->{errstr};
   $err = "$err\n" if (length($err) > 0);
+  $line =~ s/^\!//;
   $self->{errstr} = $err . $line;
 # $self->showState();
   $self->{row}= "";
_______________________________________________
Checkin-list mailing list
Checkin-list@monetdb.org
http://mail.monetdb.org/mailman/listinfo/checkin-list