URL: allow port specification in ssh:// URLs

diff --git a/git-send-email.perl b/git-send-email.perl
index 69559b289a28acf7fd095260797535f62db8172e..f1a88556824e098ab9594a6018e127c50c7fa51a 100755 (executable)
--- a/git-send-email.perl
+++ b/git-send-email.perl
@@ -21,8 +21,11 @@
 use Term::ReadLine;
 use Getopt::Long;
 use Data::Dumper;
+use Term::ANSIColor;
 use Git;
 
+$SIG{INT} = sub { print color("reset"), "\n"; exit };
+
 package FakeTerm;
 sub new {
        my ($class, $reason) = @_;