--- a/install.tcl
+++ b/install.tcl
@@ -57,7 +57,6 @@
 if {[catch "package require Tk" rc]} {
   puts "Not Found! ($rc)"
   puts "Install tk8.6 package"
-  exit 1
 } else {
   puts "Found"
 }
@@ -90,7 +89,6 @@
 if {[catch "package require tooltip" rc]} {
   puts "Not Found! ($rc)"
   puts "Install tklib package"
-  exit 1
 } else {
   puts "Found"
 }
@@ -225,6 +223,7 @@
     }
 
     # Create the file
+    set lib_dir /usr/lib/tke
     puts -nonewline "Creating [file join $bin_dir tke]...  "
     flush stdout
     if {![catch "open [file join $bin_dir tke] w" rc]} {
@@ -248,7 +247,8 @@
 }
 
 # If we are running on a system with a /usr/share/applications directory, create a tke.desktop file there
-if {[file exists [set app_dir [file join / usr share applications]]]} {
+  set app_dir [file join $install_dir share applications]
+  file mkdir $app_dir
   set app_file [file join $app_dir tke.desktop]
   puts -nonewline "Creating $app_file...  "
   flush stdout
@@ -267,12 +267,14 @@
   } else {
     puts "not done."
   }
-}
 
 # Create the MIME file so that the TKE theme and plugin bundle file extensions will be opened by TKE
-if {[file exists [set mime_dir [file join / usr share mime packages]]]} {
+  set lib_dir [file join $install_dir lib tke]
+  set mime_dir [file join $install_dir share mime packages]
+  file mkdir $mime_dir
   set mime_file     [file join $mime_dir tke.xml]
-  set mime_icon_dir [file join / usr share icons hicolor scalable mimetypes]
+  set mime_icon_dir [file join $install_dir share icons hicolor scalable mimetypes]
+  file mkdir $mime_icon_dir
   puts -nonewline "Creating mime file $mime_file...  "
   flush stdout
   if {![catch "open $mime_file w" rc]} {
@@ -295,19 +297,13 @@
     flush stdout
     catch { file copy -force [file join $lib_dir lib images tke_theme.svg]  [file join $mime_icon_dir application-x-tkethemz.svg] }
     catch { file copy -force [file join $lib_dir lib images tke_plugin.svg] [file join $mime_icon_dir application-x-tkeplugz.svg] }
-    if {![catch { exec -ignorestderr update-mime-database [file join / usr share mime] }]} {
-      puts "done."
-    } else {
-      puts "not done."
-      catch { file delete -force $mime_file }
-    }
   } else {
     puts "not done."
   }
-}
 
 # If we are running on a system that can use appdata, add the file there
-if {[file exists [set appdata_dir [file join / usr share appdata]]]} {
+  set appdata_dir [file join $install_dir share metainfo]
+  file mkdir $appdata_dir
   puts -nonewline "Copying tke.appdata.xml to [file join $appdata_dir tke.appdata.xml]...  "
   flush stdout
   if {[catch "file copy [file join data tke.appdata.xml] $appdata_dir"]} {
@@ -315,7 +311,6 @@
   } else {
     puts "done."
   }
-}
 
 # Check to see if the bin directory is in the user's path
 if {[lsearch [split $env(PATH) :] $bin_dir] == -1} {