From 18c4ddfd7bb95b403eaf953ebdf3b2100bcae9d4 Mon Sep 17 00:00:00 2001
From: Holger Hans Peter Freyther <holger@moiji-mobile.com>
Date: Thu, 24 Jul 2014 15:42:51 +0200
Subject: [PATCH] misc: Ease porting and use "self basicNew initialize" for
 init

self basicNew initialize will work on Pharo and various versions
of GST and will make sure to call initialize exactly once.
---
 SCCPHandler.st | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/SCCPHandler.st b/SCCPHandler.st
index 0d1613f..e96c30d 100644
--- a/SCCPHandler.st
+++ b/SCCPHandler.st
@@ -39,7 +39,7 @@ Object subclass: SCCPConnectionState [
 
     SCCPConnectionState class >> on: aHandler [
         <category: 'creation'>
-        ^ super new
+        ^(self basicNew)
             initialize;
             conManager: aHandler;
             yourself
@@ -463,7 +463,7 @@ deadlocks should not occur.'>
 
     SCCPHandler class >> new [
         <category: 'creation'>
-        ^ super new initialize; yourself
+        ^self basicNew initialize
     ]
 
     initialize [