Skip to content

Commit

Permalink
minor change
Browse files Browse the repository at this point in the history
  • Loading branch information
MeSophie committed Sep 28, 2023
1 parent 3b426f8 commit 8ea7db6
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions instat/ucrAdditionalLayers.vb
Original file line number Diff line number Diff line change
Expand Up @@ -131,7 +131,7 @@ Public Class ucrAdditionalLayers
SetEditDeleteEnabled()
End Sub

Private Sub cmdDelete_Click(sender As Object, e As EventArgs)
Private Sub cmdDelete_Click(sender As Object, e As EventArgs) Handles cmdDelete.Click
If lstLayers.SelectedItems.Count = 1 Then
If strMainDialogGeomNames Is Nothing OrElse Not strMainDialogGeomNames.Contains(lstLayers.SelectedItems(0).Tag) Then
clsBaseOperator.RemoveParameterByName(lstLayers.SelectedItems(0).Tag)
Expand All @@ -145,7 +145,7 @@ Public Class ucrAdditionalLayers
End If
End Sub

Private Sub cmdEdit_Click(sender As Object, e As EventArgs)
Private Sub cmdEdit_Click(sender As Object, e As EventArgs) Handles cmdEdit.Click
Dim clsSelectedGeomParameter As RParameter
Dim clsSelectedGeomFunction As RFunction
Dim clsLocalAes As RFunction
Expand Down

0 comments on commit 8ea7db6

Please sign in to comment.