From dee2b8af48efae2bfd197f7f714495ea5df91052 Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Thu, 7 Mar 2024 14:25:31 +0100
Subject: [PATCH] commit

---
 SDL/My Project/AssemblyInfo.vb             | 4 ++--
 VERAG_PROG_ALLGEMEIN/Classes/cMessenger.vb | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/SDL/My Project/AssemblyInfo.vb b/SDL/My Project/AssemblyInfo.vb
index 38fbb09b..e0bd4bd7 100644
--- a/SDL/My Project/AssemblyInfo.vb	
+++ b/SDL/My Project/AssemblyInfo.vb	
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("1.2.8.4")>
-<Assembly: AssemblyFileVersion("1.2.8.4")>
+<Assembly: AssemblyVersion("1.2.8.5")>
+<Assembly: AssemblyFileVersion("1.2.8.5")>
diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cMessenger.vb b/VERAG_PROG_ALLGEMEIN/Classes/cMessenger.vb
index 557d2be2..7b4cbc65 100644
--- a/VERAG_PROG_ALLGEMEIN/Classes/cMessenger.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cMessenger.vb
@@ -486,7 +486,7 @@ Public Class cMessenger
         End Function
 
 
-        Public Function SetOldChatsInactiv(olderthan As Integer) As Boolean
+        Public Function setOldChatsInactiv(olderthan As Integer) As Boolean
 
             Dim dateBack = If(olderthan <> "", CDate(Now.AddDays(olderthan * -1)), CDate(Now.AddDays(30 * -1)))
             Dim sqlstr = " Update [tblMessenger_Chat] set [chat_aktiv] = 0 WHERE chat_aktiv = 1 and  chat_lastMsg <=" & dateBack