From 23626555579e41d3e327252c5e5e6a970c4cce51 Mon Sep 17 00:00:00 2001
From: Eric Bollengier <eric@baculasystems.com>
Date: Thu, 17 Sep 2015 11:46:16 +0200
Subject: [PATCH] regress: Allow to use value with spaces in add_attribute()

---
 regress/scripts/functions.pm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/regress/scripts/functions.pm b/regress/scripts/functions.pm
index 57f63816c3..b73277637f 100644
--- a/regress/scripts/functions.pm
+++ b/regress/scripts/functions.pm
@@ -727,6 +727,9 @@ sub add_attribute
     my ($cur_obj, $cur_name, $done);
 
     my $is_options = $obj && $obj eq 'Options';
+    if ($value =~ /\s/ && $value !~ m:[/"]:) { # exclude speed from the escape
+        $value = "\"$value\"";
+    }
     open(FP, ">$tmp/1.$$") or die "Can't write to $tmp/1.$$";
     open(SRC, $file) or die "Can't open $file";
     while (my $l = <SRC>)
-- 
2.39.5