File obs-server-2.8-0027-backend-fix-perl-syntax.patch of Package obs-server

Overview Repositories Revisions Requests Users Attributes Meta

File obs-server-2.8-0027-backend-fix-perl-syntax.patch of Package obs-server

From 0a422b1020ee7fd9ab9e29802d0da0c0f5dee669 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Adrian=20Schr=C3=B6ter?= <adrian@suse.de>
Date: Tue, 28 Nov 2017 12:30:45 +0100
Subject: [PATCH] [backend] fix perl syntax

---
 src/backend/bs_productconvert | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/backend/bs_productconvert b/src/backend/bs_productconvert
index 6739c6e93..0522629d4 100755
--- 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
             }
-- 
2.14.3

Places

File obs-server-2.8-0027-backend-fix-perl-syntax.patch of Package obs-server

Places