From db8061a200fc7dcffe02455d565eb218d8483e02 Mon Sep 17 00:00:00 2001
From: Markus Quaritsch <markus.quaritsch@tugraz.at>
Date: Fri, 1 Apr 2016 14:53:35 +0200
Subject: [PATCH] fix compiler warning

---
 VECTOAux/VectoAuxiliariesTests/UnitTests/SSMTOOLTests.vb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/VECTOAux/VectoAuxiliariesTests/UnitTests/SSMTOOLTests.vb b/VECTOAux/VectoAuxiliariesTests/UnitTests/SSMTOOLTests.vb
index e336f360b1..30dc6b4560 100644
--- a/VECTOAux/VectoAuxiliariesTests/UnitTests/SSMTOOLTests.vb
+++ b/VECTOAux/VectoAuxiliariesTests/UnitTests/SSMTOOLTests.vb
@@ -14,7 +14,7 @@ Namespace UnitTests
 		Private Const GOODTechListEMPTYLIST As String = "TestFiles\testSSMTechBenefitsEMPTYLIST.csv"
 
 		'Helpers
-		Private Function AddDefaultTechLine(source As ISSMTOOL)
+		Private Sub AddDefaultTechLine(source As ISSMTOOL)
 
 			Dim src As SSMTOOL = DirectCast(source, SSMTOOL)
 
@@ -45,7 +45,7 @@ Namespace UnitTests
 			Dim feedback As String = String.Empty
 
 			Assert.IsTrue(src.TechList.Add(newItem, feedback))
-		End Function
+		End Sub
 
 		'SSMGenInputTests
 		<Test()> _
-- 
GitLab