Properly initialize worker thread

This relates to Bug 1404

ark/tarlistingthread.cpp

@@ -79,20 +79,24 @@ static char *makeAccessString(mode_t mode)
 }
 
 TarListingThread::TarListingThread( TQObject *parent, const TQString& filename )
-	: TQThread(), m_parent( parent )
+	: TQThread(), m_parent( parent ), m_archive(NULL)
 {
 	Q_ASSERT( m_parent );
-	m_archive = new KTar( filename );
+	m_archiveFileName = filename;
 }
 
 TarListingThread::~TarListingThread()
 {
-	delete m_archive;
-	m_archive = 0;
+	if (m_archive) {
+		delete m_archive;
+		m_archive = 0;
+	}
 }
 
 void TarListingThread::run()
 {
+	m_archive = new KTar( m_archiveFileName );
+
 	if (!m_archive->open( IO_ReadOnly ))
 	{
 		ListingEvent *ev = new ListingEvent( TQStringList(), ListingEvent::Error );

ark/tarlistingthread.h

@@ -56,6 +56,7 @@ class TarListingThread: public TQThread
 	private:
 		void processDir( const KTarDirectory *tardir, const TQString & root );
 
+		TQString m_archiveFileName;
 		KArchive *m_archive;
 		TQObject  *m_parent;
 };