Str instead of as_string

sergot · May 27, 2014 · 22ff0b8 · 22ff0b8
1 parent b4d35d3
commit 22ff0b8
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/lib/LWP/UserAgent.pm6 b/lib/LWP/UserAgent.pm6
@@ -9,7 +9,7 @@ method get(Str $url) {
     my $conn = IO::Socket::INET.new(host => $request.header('Host'), port => 80, timeout => $.timeout);
 
     my $s;
-    if $conn.send($request.as_string) {
+    if $conn.send($request.Str) {
         $s = $conn.lines.join("\n");
     }
 

diff --git a/lwp.p6 b/lwp.p6
@@ -8,7 +8,7 @@ my $req = HTTP::Request.new( GET => "http://$url/$file" );
 
 say 'Request:';
 say $req.perl;
-my $req_as_string = $req.as_string;
+my $req_as_string = $req.Str;
 say $req_as_string.perl;
 
 say '--';
@@ -38,4 +38,4 @@ say $response.perl;
 
 say '--';
 say 'get():';
-say $response.as_string;
+say $response.Str;