summaryrefslogtreecommitdiffstats
path: root/draklive
diff options
context:
space:
mode:
Diffstat (limited to 'draklive')
-rwxr-xr-xdraklive4
1 files changed, 2 insertions, 2 deletions
diff --git a/draklive b/draklive
index 671508d..594c359 100755
--- a/draklive
+++ b/draklive
@@ -379,11 +379,11 @@ sub write_dist_lists {
$lists_dir . '/' . $live->get_name . '.lst.names');
run_("chroot " . $live->get_system_root .
- qq( sh -c "rpm -qa --qf '%{size} \t%{name}\n' | sort -n" > ) .
+ qq( sh -c "rpm -qa --qf '[%{NAME} %{FILESIZES} %{FILESTATES}\n]' | awk '{if($3==0) {s[$1]+=$2}} END{for (p in s){print s[p],p}}' | sort -n" > ) .
$lists_dir . '/' . $live->get_name . '.lst.full');
run_("chroot " . $live->get_system_root .
- qq( sh -c "urpmi_rpm-find-leaves | xargs rpm -q --qf '%{size} \t%{name}\n' | sort -n" > ) .
+ qq( sh -c "urpmi_rpm-find-leaves | xargs rpm -qa --qf '[%{NAME} %{FILESIZES} %{FILESTATES}\n]' | awk '{if($3==0) {s[$1]+=$2}} END{for (p in s){print s[p],p}}' | sort -n" > ) .
$lists_dir . '/' . $live->get_name . '.lst.leaves');
require lang;