From 4ff143fa051d2b619c982e8b45741f4508f58bcd Mon Sep 17 00:00:00 2001
From: Tom Tromey <tromey@redhat.com>
Date: Thu, 25 Jan 2001 03:26:55 +0000
Subject: [PATCH] 	* automake.in (transform): Quote substitution.

---
 ChangeLog   | 4 ++++
 automake.in | 4 +++-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index fe8577f2..1190926a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2001-01-24  Tom Tromey  <tromey@redhat.com>
+
+	* automake.in (transform): Quote substitution.
+
 2001-01-21  Alexandre Duret-Lutz  <duret_g@epita.fr>
 	    Tom Tromey  <tromey@redhat.com>
 
diff --git a/automake.in b/automake.in
index f5471d3f..0c1a8f0d 100755
--- a/automake.in
+++ b/automake.in
@@ -7076,9 +7076,11 @@ sub transform
     local (%pairs) = @_;
     local ($result) = '';
 
+    local ($quoted);
     foreach $pattern (sort keys %pairs)
     {
-        $result .= 's,\@' . $pattern . '\@,' . $pairs{$pattern} . ',g;';
+	($quoted = $pairs{$pattern}) =~ s/(\W)/\\$1/g;
+        $result .= 's,\@' . $pattern . '\@,' . $quoted . ',g;';
     }
     return $result;
 }
-- 
2.43.5