diff --git a/Version Control.accda.src/modules/clsPerformance.cls b/Version Control.accda.src/modules/clsPerformance.cls
index 3f345019..7ef5bc1f 100644
--- a/Version Control.accda.src/modules/clsPerformance.cls	
+++ b/Version Control.accda.src/modules/clsPerformance.cls	
@@ -77,7 +77,6 @@ End Sub
 Public Property Get CallStack() As String
 
     Dim lngCallStackPosition As Long
-    Dim strCallStackElement As String
 
     If Not Me.Enabled Then Exit Property