projects
/
vrDialog
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
error when we can't connect to socket
[vrDialog]
/
dialog.pl
diff --git
a/dialog.pl
b/dialog.pl
index
2174f07
..
381d1e4
100755
(executable)
--- a/
dialog.pl
+++ b/
dialog.pl
@@
-42,6
+42,7
@@
my $sock = IO::Socket::INET->new(
PeerPort => '23000',
Proto => 'tcp'
);
+die "can't connect" unless $sock;
sub read_serial {
my $len = shift;