From: Nathael Pajani <nathael.pajani@ed3l.fr>
Date: Wed, 27 Apr 2016 20:50:42 +0000 (+0200)
Subject: Use the right variable for the test ...
X-Git-Url: http://git.techno-innov.fr/?a=commitdiff_plain;h=07bca790bd0a91381db201954b95fb446f080880;p=soft%2Flpc122x%2Fexamples

Use the right variable for the test ...
---

diff --git a/host/udpbridge/questions.pl b/host/udpbridge/questions.pl
index c146d50..1f2e972 100755
--- a/host/udpbridge/questions.pl
+++ b/host/udpbridge/questions.pl
@@ -35,7 +35,7 @@ sub send_to {
 	my $socket = new IO::Socket::INET(Proto => 'udp');
 	my $servaddr = sockaddr_in($port, inet_aton($server));
 	$socket->send($request, 0, $servaddr);
-	unless ($type =~ /G/) {
+	unless ($request =~ /G/) {
 		print "Request sent.\n";
 		return;
 	}