Bugfix and export from specs by default

Author: timhall

build/export.vbs

@@ -18,6 +18,9 @@ Set Args = Wscript.Arguments
 If Args.Length > 0 Then
   WBPath = Args(0)
   OutputPath = Args(1)
+Else
+  WBPath = "specs\Excel-REST - Specs.xlsm"
+  OutputPath = "src\"
 End If
 
 ' Setup modules to export

specs/Excel-REST - Specs.xlsm

@@ -16,14 +16,15 @@ Attribute VB_Name = "RestClientBase"
 Option Explicit
 
 ' > Customize with BaseUrl
-Private Const BaseUrl As String = ""
+Private Const DefaultBaseUrl As String = ""
 Private Const TimeoutMS As Integer = 5000
 Private Initialized As Boolean
 
 ' --------------------------------------------- '
 ' Properties
 ' --------------------------------------------- '
 
+Public BaseUrl As String
 Public ProxyServer As String
 Public ProxyUsername As String
 Public ProxyPassword As String
@@ -51,8 +52,12 @@ End Sub
 
 
 Private Sub Initialize()
+    If BaseUrl = "" Then
+        BaseUrl = DefaultBaseUrl
+    End If
+    
     ' > Customize with any properties
-
+    
     Initialized = True
 End Sub