From dd9f745fde8e86ffae11b0dc70452ffc1da8fd90 Mon Sep 17 00:00:00 2001
From: Mattia Barbon <mbarbon@cpan.org>
Date: Sun, 23 Feb 2003 19:27:02 +0000
Subject: [PATCH]   Allow setting default file name in wxMotif wxFileDialog.
 (backport)

git-svn-id: https://svn.wxwidgets.org/svn/wx/wxWidgets/branches/WX_2_4_BRANCH@19293 c3d73ce0-8a6f-49c7-b76d-6d57e0e08775
---
 src/motif/filedlg.cpp | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

diff --git a/src/motif/filedlg.cpp b/src/motif/filedlg.cpp
index 8f4d17b899..9336136f94 100644
--- a/src/motif/filedlg.cpp
+++ b/src/motif/filedlg.cpp
@@ -190,7 +190,9 @@ static void wxChangeListBoxColours(wxWindow* WXUNUSED(win), Widget widget)
 
     // Change colour of the scrolled areas of the listboxes
     Widget listParent = XtParent (widget);
+#if 0
     wxWindow::DoChangeBackgroundColour((WXWidget) listParent, *wxWHITE, TRUE);
+#endif
 
     Widget hsb = (Widget) 0;
     Widget vsb = (Widget) 0;
@@ -277,11 +279,6 @@ int wxFileDialog::ShowModal()
         entirePath = m_fileName;
     }
 
-    if (entirePath != "")
-    {
-        XmTextSetString(selectionWidget, (char*) (const char*) entirePath);
-    }
-
     if (m_wildCard != "")
     {
         // return something understandable by Motif
@@ -300,14 +297,16 @@ int wxFileDialog::ShowModal()
     // file selector on Solaris 1.5.1.
     if ( m_dir != "" )
     {
-        XmString thePath = XmStringCreateLtoR ((char*) (const char*) m_dir,
-            XmSTRING_DEFAULT_CHARSET);
+        wxXmString thePath( m_dir );
 
         XtVaSetValues (fileSel,
-            XmNdirectory, thePath,
+            XmNdirectory, thePath(),
             NULL);
+    }
 
-        XmStringFree(thePath);
+    if (entirePath != "")
+    {
+        XmTextSetString(selectionWidget, (char*)entirePath.c_str());
     }
 
     XtAddCallback(fileSel, XmNcancelCallback, (XtCallbackProc)wxFileSelCancel, (XtPointer)NULL);