diff --git a/SDL/My Project/AssemblyInfo.vb b/SDL/My Project/AssemblyInfo.vb
index 3e0ce53e..79eb1a99 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.4.5.3")>
-<Assembly: AssemblyFileVersion("1.4.5.3")>
+<Assembly: AssemblyVersion("1.4.5.4")>
+<Assembly: AssemblyFileVersion("1.4.5.4")>
diff --git a/SDL/frmMain.vb b/SDL/frmMain.vb
index 70a95bca..351cdea4 100644
--- a/SDL/frmMain.vb
+++ b/SDL/frmMain.vb
@@ -163,7 +163,7 @@ Public Class frmMain
                             f.TopMost = True
                         Else
                             Dim info
-                            timas.setTimeEntry(cAllgemein.MITARBEITER, Now, info, "in", frm.cboTyp._value)
+                            timas.setTimeEntry(cAllgemein.MITARBEITER, Now, info, "in", frm.typ)
                             MsgBox(info)
                         End If