From 9dbf3b366dcc8c3240bd9aac6a6792c809128360 Mon Sep 17 00:00:00 2001
From: John Hood <cgull@glup.org>
Date: Sun, 26 Jul 2015 23:50:00 -0400
Subject: [PATCH] mosh.pl: use single quotes where appropriate

---
 scripts/mosh.pl | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/scripts/mosh.pl b/scripts/mosh.pl
index bda624f..1cbaaf4 100755
--- a/scripts/mosh.pl
+++ b/scripts/mosh.pl
@@ -200,7 +200,6 @@ if ( ! defined $fake_proxy ) {
     push @bind_arguments, ('-i', "$bind_ip");
   } else {
     print STDERR qq{$0: Unknown server binding option: $bind_ip\n};
-
     die $usage;
   }
 } else {
@@ -251,7 +250,7 @@ if ( ! defined $fake_proxy ) {
   # If v4 or v6 was specified, reduce the host list.
   if ( defined( $af )) {
     @res = grep {$_->{family} == $af} @res;
-  } elsif ( $family ne "all" ) {
+  } elsif ( $family ne 'all' ) {
     # If v4/v6/all were not specified, verify that this host only has one address family available.
     for my $ai ( @res ) {
       if ( !defined( $af )) {
@@ -274,8 +273,8 @@ if ( ! defined $fake_proxy ) {
 				  Family => $ai->{family},
 				  PeerHost => $addr_string,
 				  PeerPort => $port,
-				  Proto => "tcp" )) {
-      print STDERR "MOSH IP ", $sock->peerhost, "\n";
+				  Proto => 'tcp' )) {
+      print STDERR 'MOSH IP ', $sock->peerhost, "\n";
       last;
     } else {
       $err = $@;