diff --git a/Aviso/frmHauptfenster.vb b/Aviso/frmHauptfenster.vb
index 69ee168..cf893d9 100644
--- a/Aviso/frmHauptfenster.vb
+++ b/Aviso/frmHauptfenster.vb
@@ -4436,7 +4436,9 @@ Public Class frmHauptfenster
         Me.Cursor = Cursors.Default
     End Sub
 
-    Private Sub TIRToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles TIRToolStripMenuItem.Click
+
+
+    Private Sub CarnetTIRToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles CarnetTIRToolStripMenuItem.Click
         Me.Cursor = Cursors.WaitCursor
         Dim eh As New SDL.frmTIR
         eh.Show()