Really fix #10 this time

raku-community-modules · Mar 29, 2016 · c1cf284 · c1cf284
1 parent a480f3f
commit c1cf284
Show file tree

Hide file tree

Showing 4 changed files with 5 additions and 5 deletions.
diff --git a/lib/Net/SMTP/Raw.pm6 b/lib/Net/SMTP/Raw.pm6
@@ -35,7 +35,7 @@ method starttls() {
 }
 method switch-to-ssl() {
     $!conn = IO::Socket::SSL.new(:client-socket($.conn));
-    $!conn.input-line-separator = "\r\n";
+    $!conn.nl-in = "\r\n";
 }
 
 method mail-from($address) {

diff --git a/t/01-raw.t b/t/01-raw.t
@@ -24,7 +24,7 @@ class SMTPSocket {
 
     has $.host;
     has $.port;
-    has $.input-line-separator is rw = "\n";
+    has $.nl-in is rw = "\n";
     method new(:$host, :$port) {
         self.bless(:$host, :$port);
     }
@@ -46,7 +46,7 @@ my $client = Net::SMTP.new(:server('foo.com'), :port(25), :raw, :socket(SMTPSock
 ok $client ~~ Net::SMTP, "Created raw class";
 ok $client.conn.host eq 'foo.com', "with right host";
 ok $client.conn.port eq '25', 'with right port';
-ok $client.conn.input-line-separator eq "\r\n", 'with right line sep';
+ok $client.conn.nl-in eq "\r\n", 'with right line sep';
 
 ok $client.get-response.substr(0,1) eq '2', 'Greeting';
 ok $client.helo('clientdomain.com').substr(0,1) eq '2', 'HELO';

diff --git a/t/02-simple.t b/t/02-simple.t
@@ -32,7 +32,7 @@ class SMTPSocket {
 
     has $.host;
     has $.port;
-    has $.input-line-separator is rw = "\n";
+    has $.nl-in is rw = "\n";
     method new(:$host, :$port) {
         self.bless(:$host, :$port);
     }

diff --git a/t/03-auth.t b/t/03-auth.t
@@ -27,7 +27,7 @@ class SMTPSocket {
 
     has $.host;
     has $.port;
-    has $.input-line-separator is rw = "\n";
+    has $.nl-in is rw = "\n";
     method new(:$host, :$port) {
         self.bless(:$host, :$port);
     }