+    // one extension in the space or comma delimitid list
+    wxString strExt;
+    for ( const wxChar *p = strExtensions; ; p++ ) {
+        if ( *p == wxT(' ') || *p == wxT(',') || *p == wxT('\0') ) {
+            if ( !strExt.IsEmpty() ) {
+                extensions.Add(strExt);
+                strExt.Empty();
+            }
+            //else: repeated spaces (shouldn't happen, but it's not that
+            //      important if it does happen)
+
+            if ( *p == wxT('\0') )
+                break;
+        }
+        else if ( *p == wxT('.') ) {
+            // remove the dot from extension (but only if it's the first char)
+            if ( !strExt.IsEmpty() ) {
+                strExt += wxT('.');
+            }
+            //else: no, don't append it
+        }
+        else {
+            strExt += *p;
+        }
+    }
+
+    return TRUE;
+}
+
+// set an arbitrary command,
+// could adjust the code to ask confirmation if it already exists and
+// overwriteprompt is TRUE, but this is currently ignored as *Associate* has
+// no overwrite prompt
+bool wxFileTypeImpl::SetCommand(const wxString& cmd, const wxString& verb, bool overwriteprompt /*= TRUE*/)
+    {
+    wxArrayString strExtensions;
+    wxString strDesc, strIcon ;
+
+    wxMimeArrayString *entry = new wxMimeArrayString ();
+    entry->Add(verb + wxT("=")  + cmd + wxT(" %s "));
+
+    wxArrayString strTypes;
+    GetMimeTypes (strTypes);
+    if (strTypes.GetCount() < 1) return FALSE;
+
+    size_t i;
+    bool Ok = TRUE;
+    for (i = 0; i < strTypes.GetCount(); i++)
+        {
+        if (!m_manager->DoAssociation (strTypes[i], strIcon, entry, strExtensions, strDesc))
+        Ok = FALSE;
+        }
+
+    return Ok;
+    }
+
+// ignore index on the grouds that we only have one icon in a Unix file
+bool wxFileTypeImpl::SetDefaultIcon(const wxString& strIcon /*= wxEmptyString*/, int /*index = 0*/)
+    {
+    if (strIcon.IsEmpty()) return FALSE;
+    wxArrayString strExtensions;
+    wxString strDesc;
+
+    wxMimeArrayString *entry = new wxMimeArrayString ();
+
+    wxArrayString strTypes;
+    GetMimeTypes (strTypes);
+    if (strTypes.GetCount() < 1) return FALSE;
+
+    size_t i;
+    bool Ok = TRUE;
+    for (i = 0; i < strTypes.GetCount(); i++)
+        {
+        if (!m_manager->DoAssociation (strTypes[i], strIcon, entry, strExtensions, strDesc))
+        Ok = FALSE;
+        }
+
+    return Ok;
+    }
+// ----------------------------------------------------------------------------
+// wxMimeTypesManagerImpl (Unix)
+// ----------------------------------------------------------------------------
+
+
+wxMimeTypesManagerImpl::wxMimeTypesManagerImpl()
+{
+    m_initialized = FALSE;
+    m_mailcapStylesInited = 0;
+}
+
+// read system and user mailcaps and other files
+void wxMimeTypesManagerImpl::Initialize(int mailcapStyles,
+                                        const wxString& sExtraDir)
+{
+    // read mimecap amd mime.types
+    if ( (mailcapStyles & wxMAILCAP_NETSCAPE) ||
+         (mailcapStyles & wxMAILCAP_STANDARD) )
+        GetMimeInfo(sExtraDir);
+
+    // read GNOME tables
+    if ( mailcapStyles & wxMAILCAP_GNOME)
+        GetGnomeMimeInfo(sExtraDir);
+
+    // read KDE tables
+    if ( mailcapStyles & wxMAILCAP_KDE)
+        GetKDEMimeInfo(sExtraDir);
+
+    m_mailcapStylesInited |= mailcapStyles;
+}
+
+// clear data so you can read another group of WM files
+void wxMimeTypesManagerImpl::ClearData()
+{
+    m_aTypes.Clear ();
+    m_aIcons.Clear ();
+    m_aExtensions.Clear ();
+    m_aDescriptions.Clear ();
+
+    size_t cnt = m_aTypes.GetCount();
+    for (size_t i = 0; i < cnt; i++)
+    {
+        m_aEntries[i]->Clear ();
+    }
+    m_aEntries.Clear ();
+    m_mailcapStylesInited = 0;
+}
+
+wxMimeTypesManagerImpl::~wxMimeTypesManagerImpl()
+{
+    ClearData(); // do we need to delete the ArrayStrings too to avoid a leak
+
+//    delete m_aEntries //fix a leak here ?;
+}
+
+
+void wxMimeTypesManagerImpl::GetMimeInfo (const wxString& sExtraDir)
+{
+    // read this for netscape or Metamail formats
+
+    // directories where we look for mailcap and mime.types by default
+    // used by netscape and pine and other mailers, using 2 different formats!
+
+    // (taken from metamail(1) sources)
+    //
+    // although RFC 1524 specifies the search path of
+    // /etc/:/usr/etc:/usr/local/etc only, it doesn't hurt to search in more
+    // places - OTOH, the RFC also says that this path can be changed with
+    // MAILCAPS environment variable (containing the colon separated full
+    // filenames to try) which is not done yet (TODO?)
+
+    wxString strHome = wxGetenv(wxT("HOME"));
+
+    wxArrayString dirs;
+    dirs.Add ( wxT("/etc/") );
+    dirs.Add ( wxT("/usr/etc/") );
+    dirs.Add ( wxT("/usr/local/etc/") );
+    dirs.Add ( wxT("/etc/mail/") );
+    dirs.Add ( wxT("/usr/public/lib/") );
+    dirs.Add ( strHome + wxT("/.") );
+    if (!sExtraDir.IsEmpty()) dirs.Add ( sExtraDir + wxT("/") );
+
+    size_t nDirs = dirs.GetCount();
+    for ( size_t nDir = 0; nDir < nDirs; nDir++ )
+    {
+        wxString file = dirs[nDir] + wxT("mailcap");
+        if ( wxFile::Exists(file) ) {
+            ReadMailcap(file);
+        }
+
+        file = dirs[nDir] + wxT("mime.types");
+        if ( wxFile::Exists(file) ) {
+            ReadMimeTypes(file);
+        }
+    }
+
+}
+
+bool wxMimeTypesManagerImpl::WriteToMimeTypes (int index, bool delete_index)
+{
+    // check we have the right manager
+    if (! ( m_mailcapStylesInited & wxMAILCAP_STANDARD) )