diff --git a/src/mac/carbon/dcscreen.cpp b/src/mac/carbon/dcscreen.cpp
index 03d769a05b..6ed78b6353 100644
--- a/src/mac/carbon/dcscreen.cpp
+++ b/src/mac/carbon/dcscreen.cpp
@@ -24,7 +24,7 @@ IMPLEMENT_DYNAMIC_CLASS(wxScreenDC, wxWindowDC)
 wxScreenDC::wxScreenDC()
 {
 #if TARGET_CARBON
-    m_macPort = GetQDGlobalsThePort() ;
+    m_macPort = CreateNewPort() ;
     GrafPtr port ;
     GetPort( &port ) ;
     SetPort( (GrafPtr) m_macPort ) ;
@@ -57,7 +57,7 @@ wxScreenDC::wxScreenDC()
 }
 
 wxScreenDC::~wxScreenDC()
-{
-    // TODO
+{   
+    DisposePort( (CGrafPtr) m_macPort ) ;
 }