From 06603f3fcbc7bdee8942ed1c3746c76260e7446a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?J=C3=BCrgen=20Weigert?= Date: Wed, 26 Mar 2008 19:24:05 +0000 Subject: [PATCH] typo. --- osc_expand_link.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/osc_expand_link.pl b/osc_expand_link.pl index 4aea9332..aebc33f8 100755 --- a/osc_expand_link.pl +++ b/osc_expand_link.pl @@ -143,7 +143,7 @@ to retrieve the original specfile behind a link. my $file_re = "\Q$file\E"; $file_re =~ s{\\\*}{\.\*}g; my @match = grep { $_ =~ m{^$file_re$} } @list; die "pattern $file not found in\n @list\n" unless @match; - $file = @match[0]; + $file = $match[0]; } $url .= "/$file";