From: Jouk Jansen <joukj@hrem.nano.tudelft.nl>
Date: Thu, 29 Apr 2004 07:42:39 +0000 (+0000)
Subject:  Committing in .
X-Git-Url: https://git.saurik.com/wxWidgets.git/commitdiff_plain/5f9a153ce1167ee5ddc32240dda881f3b3af257e

 Committing in .

 OpenVMS : supress warnings on unreacheable code

 Modified Files:
 	wxWidgets/src/motif/dialog.cpp
 ----------------------------------------------------------------------


git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/trunk@27003 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
---

diff --git a/src/motif/dialog.cpp b/src/motif/dialog.cpp
index 393429dc1f..443f7e9a78 100644
--- a/src/motif/dialog.cpp
+++ b/src/motif/dialog.cpp
@@ -194,7 +194,10 @@ bool wxDialog::DoCreate( wxWindow* parent, wxWindowID id,
 
 void wxDialog::SetModal(bool flag)
 {
-    if ( flag )
+#ifdef __VMS
+#pragma message disable codcauunr
+#endif
+   if ( flag )
         m_windowStyle |= wxDIALOG_MODAL ;
     else
         if ( m_windowStyle & wxDIALOG_MODAL )
@@ -203,6 +206,9 @@ void wxDialog::SetModal(bool flag)
         wxModelessWindows.DeleteObject(this);
         if (!flag)
             wxModelessWindows.Append(this);
+#ifdef __VMS
+#pragma message enable codcauunr
+#endif
 }
 
 wxDialog::~wxDialog()