[backend] fix perl syntax

openSUSE · Nov 28, 2017 · 548beed · 548beed
1 parent 92fc227
commit 548beed
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/backend/bs_productconvert b/src/backend/bs_productconvert
@@ -179,13 +179,13 @@ sub getUrl( $$$ ){
         if ( "$url->{'name'}" eq "$searchstring" ){
             if ( exists $url->{'arch'} && "$url->{'arch'}" eq "$arch" ) {
                 my $u = $url->{'_content'};
-                $u =~ s/%{_target_cpu}/$arch/g;
+                $u =~ s/%\{_target_cpu\}/$arch/g;
                 return $u;
             } elsif (exists $url->{'arch'}) {
                 next;
             } else {
                 my $u = $url->{'_content'};
-                $u =~ s/%{_target_cpu}/$arch/g;
+                $u =~ s/%\{_target_cpu\}/$arch/g;
                 $resulturl = $u;
                 # Continue searching, in case we find an architecture match
             }