From 611d3521035da73420cdd7749e4510152053d3d6 Mon Sep 17 00:00:00 2001
From: Andreas Rehm <rehm@itsolution2.de>
Date: Sat, 19 Feb 2011 18:17:40 +0100
Subject: [PATCH] Debug infos only for Debug Config

---
 mRemoteV1/Forms/frmMain.vb       | 4 +++-
 mRemoteV1/UI/UI.Window.Config.vb | 2 +-
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/mRemoteV1/Forms/frmMain.vb b/mRemoteV1/Forms/frmMain.vb
index 4d9528d6..8593c423 100644
--- a/mRemoteV1/Forms/frmMain.vb
+++ b/mRemoteV1/Forms/frmMain.vb
@@ -683,7 +683,9 @@ Public Class frmMain
 
     Protected Overloads Overrides Sub WndProc(ByRef m As Message)
         Try
-            'Debug.Print(m.Msg)
+#If Config = "Debug" Then
+            Debug.Print(m.Msg)
+#End If
 
             Select Case m.Msg
                 Case WM_GETTEXT
diff --git a/mRemoteV1/UI/UI.Window.Config.vb b/mRemoteV1/UI/UI.Window.Config.vb
index 560998f5..495e856b 100644
--- a/mRemoteV1/UI/UI.Window.Config.vb
+++ b/mRemoteV1/UI/UI.Window.Config.vb
@@ -215,7 +215,7 @@ Namespace UI
 
             ' Main form handle command key events
             Protected Overrides Function ProcessCmdKey(ByRef msg As System.Windows.Forms.Message, ByVal keyData As System.Windows.Forms.Keys) As Boolean
-#If DEBUG Then
+#If Config = "Debug" Then
                 Debug.Print("key: " & keyData.ToString)
                 Debug.Print("msg: " & msg.Msg)
                 Debug.Print("hwnd: " & msg.HWnd.ToString)