luisgulo/gambas-source-code
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Debugger: Renaming a module correctly updates breakpoints now.

Browse source 
[DEVELOPMENT ENVIRONMENT]
* BUG: Debugger: Renaming a module correctly updates breakpoints now.
This commit is contained in:
gambas 2018-04-02 11:12:03 +02:00
parent 31193668a9
commit 9969c3c528
2 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
app/src/gambas3/.src/Debug/FDebugInfo.class
View file

@ -1084,6 +1084,7 @@ Public Sub RefreshBreakpointView()
gvwBreakpoint.Columns[1].Width = -1
gvwBreakpoint.Columns[2].Width = -1
gvwBreakpoint.Refresh
gvwBreakpoint_Click
End

8
app/src/gambas3/.src/Project.module
View file

@ -6382,6 +6382,7 @@ Private Sub RenamePaths(sOld As String, sNew As String)
Dim hForm As Object
Dim sCheck As String
Dim sNewFormPath As String
Dim sExt As String
' Rename DoNotTranslate
@ -6429,8 +6430,11 @@ Private Sub RenamePaths(sOld As String, sNew As String)
' Rename breakpoints
If IsSourcePath(sOld) And If File.Ext(sOld) = "class" Then
Design.RenameClass(File.BaseName(sOld), File.BaseName(sNew))
If IsSourcePath(sOld) Then
sExt = File.Ext(sOld)
If sExt = "class" Or If sExt = "module" Then
Design.RenameClass(File.BaseName(sOld), File.BaseName(sNew))
Endif
Endif
End