Software farm: Don't crash when installing an example if its symbolic link alread exists.
[DEVELOPMENT ENVIRONMENT] * BUG: Software farm: Don't crash when installing an example if its symbolic link alread exists. * BUG: Project tree: CTRL + double-click is now triggered only on source files.
This commit is contained in:
parent
64f20f041f
commit
e9bc65686c
2 changed files with 5 additions and 2 deletions
|
@ -146,6 +146,7 @@ Public Sub tvwProject_Activate()
|
||||||
Dim sMime As String
|
Dim sMime As String
|
||||||
Dim hProgList As DesktopFile[]
|
Dim hProgList As DesktopFile[]
|
||||||
Dim hProcess As Process
|
Dim hProcess As Process
|
||||||
|
Dim sKeyClass As String
|
||||||
|
|
||||||
sKey = tvwProject.Key
|
sKey = tvwProject.Key
|
||||||
|
|
||||||
|
@ -153,8 +154,9 @@ Public Sub tvwProject_Activate()
|
||||||
tvwProject[sKey].Expanded = True
|
tvwProject[sKey].Expanded = True
|
||||||
If CanEdit(sKey) Then
|
If CanEdit(sKey) Then
|
||||||
If $bCtrl Then
|
If $bCtrl Then
|
||||||
If File.Ext(sKey) <> "module" Then
|
If Project.IsSourcePath(sKey) And If File.Ext(sKey) <> "module" Then
|
||||||
sKey = File.SetExt(sKey, "class")
|
sKeyClass = File.SetExt(sKey, "class")
|
||||||
|
If Project.IsSourcePath(sKeyClass) Then sKey = sKeyClass
|
||||||
Endif
|
Endif
|
||||||
Endif
|
Endif
|
||||||
Project.OpenFile(sKey,,, True)
|
Project.OpenFile(sKey,,, True)
|
||||||
|
|
|
@ -442,6 +442,7 @@ Public Sub Install(Optional bJustDownload As Boolean) As String
|
||||||
|
|
||||||
If LCase(Vendor) <> "example" And If Tags.Exist("example", gb.IgnoreCase) Then
|
If LCase(Vendor) <> "example" And If Tags.Exist("example", gb.IgnoreCase) Then
|
||||||
Try Mkdir File.SetName(sSrcDir, "example")
|
Try Mkdir File.SetName(sSrcDir, "example")
|
||||||
|
Try Kill File.SetName(sSrcDir, "example") &/ sName
|
||||||
Link ".." &/ File.Name(sSrcDir) &/ sName To File.SetName(sSrcDir, "example") &/ sName
|
Link ".." &/ File.Name(sSrcDir) &/ sName To File.SetName(sSrcDir, "example") &/ sName
|
||||||
Endif
|
Endif
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue