2006-10-02 Carlos Garnacho <carlosg@gnome.org>

        * Utils/Parse.pm (escape): fix slight problem when $value has spaces.

1 files changed, 4 insertions, 4 deletions

diff --git a/Utils/Parse.pm b/Utils/Parse.pm
index ecd6931..e683d94 100644
--- a/Utils/Parse.pm
+++ b/Utils/Parse.pm
@@ -563,9 +563,9 @@ sub unescape
 sub escape
 {
   my ($value) = @_;
-  
-  $value =~ s/([\"\`\$\\])/\\$1/g;
-  $value = "\"$value\"" if ($value =~ /[ \t\'&|*?\[\]\{\}\{\}<>]/);
+
+  $value =~ s/([\ \"\`\$\\])/\\$1/g;
+  #$value = "\"$value\"" if ($value =~ /[ \t\'&|*?\[\]\{\}\{\}<>]/);
 
   return $value;
 }
@@ -832,7 +832,7 @@ sub get_from_ini
   &Utils::Report::leave ();
   $res = undef;
   $escaped_section = &escape ($section);
-  
+
   while (($line = &ini_line_read ($fd)) != -1)
   {
     $_ = $$line;