Skip to content

Commit 227f532

Browse files
committed
groundwater toolbox 1.3.2 updates; add hydrotoolbox version label
1 parent e1a3ae3 commit 227f532

File tree

3 files changed

+11
-2
lines changed

3 files changed

+11
-2
lines changed

BASINS/atcBasinsPlugIn.vb

+8
Original file line numberDiff line numberDiff line change
@@ -124,6 +124,14 @@ Public Class atcBasinsPlugIn
124124
.Add("Welcome to BASINS 4.5 Window", "Welcome to GW Toolbox Window")
125125
.Add("Build BASINS Project", "Build New Project")
126126
End With
127+
Case "Hydro Toolbox"
128+
lHelpFilename = FindFile("Please Find Help Document", g_ProgramDir & "docs\GWToolbox.chm")
129+
BasinsDataPath = "USGS-WATER\data\"
130+
With atcUtility.HelpSubstitutions
131+
.Add("BASINS Details", "GW Toolbox Details")
132+
.Add("Welcome to BASINS 4.5 Window", "Welcome to GW Toolbox Window")
133+
.Add("Build BASINS Project", "Build New Project")
134+
End With
127135

128136
Case Else ' BASINS
129137
lHelpFilename = FindFile("", g_ProgramDir & "docs\BASINS4.5.chm")

BASINS/frmAbout.vb

+1
Original file line numberDiff line numberDiff line change
@@ -377,6 +377,7 @@ Friend Class frmAbout
377377
End Try
378378
Try
379379
#If ProgramName = "USGS GW Toolbox" Then
380+
Me.Width += 30
380381

381382
#ElseIf ProgramName = "USGS SW Toolbox" Then
382383
Me.Width += 30

BASINS/modBasinsPlugin.vb

+2-2
Original file line numberDiff line numberDiff line change
@@ -23,13 +23,13 @@ Public Module modBasinsPlugin
2323
#If ProgramName = "USGS GW Toolbox" Then
2424
Public Const g_AppNameRegistry As String = "USGS-GW" 'For preferences in registry
2525
Friend Const g_AppNameShort As String = "GW Toolbox"
26-
Friend Const g_AppNameLong As String = "USGS GW Toolbox 1.3"
26+
Friend Const g_AppNameLong As String = "USGS GW Toolbox 1.3.2"
2727
Friend Const g_URL_Home As String = "http://water.usgs.gov/ogw/gwtoolbox/"
2828
Friend Const g_URL_Register As String = "http://hspf.com/pub/USGS-GW/register.html"
2929
#ElseIf ProgramName = "USGS SW Toolbox" Then
3030
Public Const g_AppNameRegistry As String = "USGS-SW" 'For preferences in registry
3131
Friend Const g_AppNameShort As String = "SW Toolbox"
32-
Friend Const g_AppNameLong As String = "USGS SW Toolbox 1.0.3"
32+
Friend Const g_AppNameLong As String = "USGS SW Toolbox 1.0.5"
3333
Friend Const g_URL_Home As String = "https://water.usgs.gov/osw/swtoolbox/"
3434
Friend Const g_URL_Register As String = "http://hspf.com/pub/USGS-SW/register.html"
3535
#ElseIf ProgramName = "USGS Hydrologic Toolbox" Then

0 commit comments

Comments
 (0)