diff --git a/.github/workflows/lint_vba.yml b/.github/workflows/lint_vba.yml
index 26836e7..4637b9c 100644
--- a/.github/workflows/lint_vba.yml
+++ b/.github/workflows/lint_vba.yml
@@ -13,4 +13,6 @@ jobs:
     steps:
     - uses: actions/checkout@v3
     - name: Lint
-      uses: Vba-actions/lint-vba@main
+      uses: Vba-actions/lint-vba@dev
+      with:
+        path: './src'
diff --git a/README.md b/README.md
index c8e4ee7..531af3b 100644
--- a/README.md
+++ b/README.md
@@ -24,7 +24,7 @@ Features
  Setup
 -----
 
-Open Microsoft Visual Basic For Applications and import each cls and bas and frm file into a new project. Name the project SQLlib and save it as an xlam file. Enable the addin. Within Microsoft Visual Basic For Applications, select Tools>References and ensure that  "Microsoft ActiveX Data Objects x.x Library", "Microsoft Scripting Runtime", and SQLlib is selected.
+Open Microsoft Visual Basic For Applications and import each cls and bas and frm file into a new project. Name the project SQLlib and save it as an xlam file. Enable the addin. Within Microsoft Visual Basic For Applications, select Tools>References and ensure that  "Microsoft ActiveX Data Objects x.x Library", "Microsoft Scripting Runtime", and SQLlib is selected. 
  
  Security
 -----
diff --git a/src/ClassModules/SQLDatabase.cls b/src/ClassModules/SQLDatabase.cls
index 0a04639..ce1aae7 100644
--- a/src/ClassModules/SQLDatabase.cls
+++ b/src/ClassModules/SQLDatabase.cls
@@ -76,7 +76,7 @@ Public Function Execute(oSQL As iSQLQuery, Optional return_column = "")
     If return_column <> "" Then
         If rst.EOF Then
             Execute = False
-        Else			
+        Else
             Execute = rst.GetValue(return_column)
         End If
     Else
diff --git a/src/ClassModules/SQLSelect.cls b/src/ClassModules/SQLSelect.cls
index 55f69b1..53c1d09 100644
--- a/src/ClassModules/SQLSelect.cls
+++ b/src/ClassModules/SQLSelect.cls
@@ -200,8 +200,8 @@ Public Function iSQLQuery_ToString() As String
     If UBound(vFields) < 0 Then
         return_string = ""
     Else
-        return_string = "SELECT " & DistinctString & FieldList & " FROM " & _
-            JoinString & oSQL.WhereString & GroupByString & HavingString & OrderByString
+        return_string = "SELECT " & DistinctString & FieldList & " FROM " & JoinString & _
+            oSQL.WhereString & GroupByString & HavingString & OrderByString
     End If
     iSQLQuery_ToString = oSQL.ReplaceArguments(return_string)
 End Function
diff --git a/src/ClassModules/iSQLRecordset.cls b/src/ClassModules/iSQLRecordset.cls
index c5eabf0..fb2393e 100644
--- a/src/ClassModules/iSQLRecordset.cls
+++ b/src/ClassModules/iSQLRecordset.cls
@@ -27,7 +27,7 @@ Public Function GetValue(MyFieldname)
 End Function
 
 ' Function: GetValue
-Public Function GetRows(num as Integer)
+Public Function GetRows(num As Integer)
 
 End Function
 
diff --git a/src/Modules/SQLHelperFunctions.bas b/src/Modules/SQLHelperFunctions.bas
index f3743f9..fb2618a 100644
--- a/src/Modules/SQLHelperFunctions.bas
+++ b/src/Modules/SQLHelperFunctions.bas
@@ -12,8 +12,8 @@ Public Function str(vValue) As String
 End Function
 
 Function JoinArrayofArrays(ByVal vArray As Variant, _
-                Optional ByVal WordDelim As String = " ", _
-                Optional ByVal LineDelim As String = vbNewLine) As String
+        Optional ByVal WordDelim As String = " ", _
+        Optional ByVal LineDelim As String = vbNewLine) As String
     Dim R As Long, Lines() As String
     ReDim Lines(0 To UBound(vArray))
     For R = 0 To UBound(vArray)