Socket fixes; supernovus++ for discovering the issue and testing the …

…fix.
rakudo · Sep 12, 2011 · ad9639a · ad9639a
1 parent 831b481
commit ad9639a
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/src/core/IO/Socket/INET.pm b/src/core/IO/Socket/INET.pm
@@ -80,27 +80,27 @@ my class IO::Socket::INET does IO::Socket {
             $PIO.connect($addr);
         }
 
-        nqp::bindattr(self, INET, '$!PIO', $PIO);
+        nqp::bindattr(self, $?CLASS, '$!PIO', $PIO);
         self;
     }
 
     method get() {
-        nqp::p6box_s(nqp::getattr(self, INET, '$!PIO').readline).chomp
+        nqp::p6box_s(nqp::getattr(self, $?CLASS, '$!PIO').readline).chomp
     }
 
     method lines() {
         gather { take self.get() };
     }
 
     method accept() {
-        return nqp::p6bool(nqp::getattr(self, INET, '$!PIO').accept());
+        return nqp::p6bool(nqp::getattr(self, $?CLASS, '$!PIO').accept());
     }
 
     method remote_address() {
-        return nqp::p6box_s(nqp::getattr(self, INET, '$!PIO').remote_address());
+        return nqp::p6box_s(nqp::getattr(self, $?CLASS, '$!PIO').remote_address());
     }
 
     method local_address() {
-        return nqp::p6box_s(nqp::getattr(self, INET, '$!PIO').local_address());
+        return nqp::p6box_s(nqp::getattr(self, $?CLASS, '$!PIO').local_address());
     }
 }