Do not clear the version control and the test console when the project is reloaded.
[DEVELOPMENT ENVIRONMENT] * NEW: Do not clear the version control and the test console when the project is reloaded.
This commit is contained in:
parent
b5d0df01a6
commit
2cbea0c358
3 changed files with 7 additions and 3 deletions
|
@ -6,7 +6,6 @@ Private $cBreakpoints As Collection
|
|||
|
||||
Public Sub OnProjectChange()
|
||||
|
||||
|
||||
$cBreakpoints = Project.Config["/Debug/Breakpoints"]
|
||||
If Not $cBreakpoints Then $cBreakpoints = New Collection
|
||||
|
||||
|
|
|
@ -1017,8 +1017,10 @@ Public Sub OnProjectChange()
|
|||
UpdateTask
|
||||
SetCompilation()
|
||||
CloseSearch
|
||||
If Project.Dir <> Project.PreviousDir Then
|
||||
trmVersionControl.Clear
|
||||
trmTest.Clear
|
||||
Endif
|
||||
panTestResult.Hide
|
||||
$cTrack = New Collection
|
||||
$iLastBreakpointsTimeStamp = 0
|
||||
|
|
|
@ -35,6 +35,7 @@ Public ActiveForm As Object
|
|||
Public Path As String
|
||||
Public Name As String
|
||||
Public Dir As String
|
||||
Public PreviousDir As String
|
||||
Public SourceDir As String
|
||||
Public ReadOnly As Boolean
|
||||
|
||||
|
@ -648,6 +649,8 @@ Public Function Open(sDir As String, Optional bInAnotherWindow As Boolean, sOpen
|
|||
|
||||
Endif
|
||||
|
||||
PreviousDir = Project.Dir
|
||||
|
||||
If Not $bTesting Then
|
||||
If CloseProject() Then Return True
|
||||
Endif
|
||||
|
|
Loading…
Reference in a new issue