Remove empty arch-specific dirs during installation

apjanke · Apr 14, 2019 · 8cc3c0d · 8cc3c0d
1 parent 7c45c15
commit 8cc3c0d
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/inst/+packajoozle/+internal/PkgManager.m b/inst/+packajoozle/+internal/PkgManager.m
@@ -328,6 +328,12 @@ function display_user_messages (this, rslt)
           desc.name, err.message);
       end_try_catch
 
+      # Tidy up the installation
+
+      if dir_is_empty (target.arch_dir)
+        rm_rf_safe (target.arch_dir);
+      endif
+
       # Validate the installation
 
       if dirempty (target.dir, {"packinfo", "doc"}) ...
@@ -508,6 +514,9 @@ function rm_rf_safe (path)
 % ======================================================
 % My special functions
 
+function out = dir_is_empty (path)
+  out = isempty (packajoozle.internal.Util.readdir (path));
+endfunction
 
 % ======================================================
 %