From 5a470cb74c1198497e7bb9b05f9ce34474ee48f6 Mon Sep 17 00:00:00 2001 From: Thomas Backlund Date: Sun, 29 Apr 2012 23:23:13 +0000 Subject: list installed size, not rpm size as we do not install unsupported language files (pterjan) --- draklive | 4 ++-- 1 file 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; -- cgit v1.2.1