From 0344a3b5e4c6b9a261c1c0a17f3cb6f647364b23 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 9 Jul 2004 04:11:25 +0000 Subject: ensure "*" to wildcard a directory in share/list match only once --- perl-install/Makefile | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/Makefile b/perl-install/Makefile index b23460334..3c20cbb38 100644 --- a/perl-install/Makefile +++ b/perl-install/Makefile @@ -82,7 +82,7 @@ get_needed_files: $(DIRS) mo_files eval `perl -V:version`; \ cat share/list `../tools/specific_arch share/list` | \ perl -pe "s/ARCH/$(ARCH)/g ; s/PERL_VERSION/$$version/g ; s|/LIB/|/$(LIB)/|g " | \ - perl -lpe '@l = glob; !m|\*.*/| || @l == 1 and $$_ = join("\n", @l)' > /tmp/list + perl -lpe '@l = glob; m|\*.*/| && @l != 1 and die "no/multiple match for $$_\n"; $$_ = join("\n", @l)' > /tmp/list rpm -ql perl-Gtk2 perl-Glib | grep '^/usr/lib/perl5' | grep -v '\.pod$$' >> /tmp/list @missing=`perl -lne 'print if !-e $$_' /tmp/list`; [ -z "$$missing" ] || { echo "missing or multiple files vvvvvvvvvvvvvvvvvvvvvvvvvv" ; echo "$$missing" ; echo "missing or multiple files ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^" ; exit 1; } -- cgit v1.2.1