perl_checker fixes

1 files changed, 2 insertions, 2 deletions

diff --git a/draklive b/draklive
index cdb0d46..c47ce8f 100755
--- a/draklive
+++ b/draklive
@@ -780,7 +780,7 @@ sub post_install_system {
         copy_files_to($live, $live->{media}{files}, get_builddir($live) . $live->{prefix}{build}{files});
     }
 
-    run_("chroot ". get_system_root($live) . " rpm -qa | sort > " . get_builddir($live) . "/packages.lst");
+    run_("chroot " . get_system_root($live) . " rpm -qa | sort > " . get_builddir($live) . "/packages.lst");
 
     umask $previous_umask;
 }
@@ -1189,7 +1189,7 @@ sub record_usb_master {
     maybe_umount_device($device);
 
     if ($type eq 'vfat') {
-        mtools_run_('mattrib', '+a', '+r', '+s', '+h', '-/', '-i', $device, '::' . $_) foreach @dot_files
+        mtools_run_('mattrib', '+a', '+r', '+s', '+h', '-/', '-i', $device, '::' . $_) foreach @dot_files;
     }
 }