X-Git-Url: https://git.jankratochvil.net/?p=nethome.git;a=blobdiff_plain;f=bin%2Frpmmerge;h=39fb27d5f2c14324be0276a36a7f50a2c504b835;hp=38eb88511841b2eca17366a11ce41036e4258c40;hb=9941dd67625f104aeb2954ff1942bc7b1b0df549;hpb=50a447c4b88ad73e16dec18f354816a248c527fb

diff --git a/bin/rpmmerge b/bin/rpmmerge
index 38eb885..39fb27d 100755
--- a/bin/rpmmerge
+++ b/bin/rpmmerge
@@ -14,7 +14,7 @@ for base in $l;do
 	test ! -f $base.rej
 
 	test ! -f $base-orig
-	# The old format should be converted by:
+	# The old `-orig' format should be converted by:
 	# rpm -qla|perl -lne 'chomp;s/$/-orig/;next if ! -e;$o=$_;$o=~s/-orig$//;$o=~tr{/}{-};$o="/root/rpmmerge/$o";die $o if -e $o;$_="mv -f '\''$_'\'' '\''$o'\''";system $_ and die "$_: $!";'
 
 	orig="/root/rpmmerge/$(echo $base|tr / -)"
@@ -53,6 +53,7 @@ done
 
 if $ok
 then
+	mkdir -p /root/rpmmerge
 	rpm -qac|perl -ne 'chomp;next if $_ eq "(contains no files)";next if m{^/var/lib/rpm/};next if $_ eq "/usr/lib/locale/locale-archive";next if ! -f $_;$o=$_;$o=~tr{/}{-};$o="/root/rpmmerge/$o";next if -e $o;system "cp -i -p '\''$_'\'' '\''$o'\''" and die "$_: $!";'
 
 	echo OK