diff --git a/libstdc++-v3/ChangeLog b/libstdc++-v3/ChangeLog
index 3f465cf26e994636bbf35c5cd66febd8e4158f0e..b87cb77408aa4b83b5edbadb9479bfe78dd30eba 100644
--- a/libstdc++-v3/ChangeLog
+++ b/libstdc++-v3/ChangeLog
@@ -1,3 +1,8 @@
+2006-10-15  Geoffrey Keating  <geoffk@apple.com>
+
+	* scripts/make_exports.pl: Use -_ rather than --strip-underscores
+	or --strip-underscore.
+
 2006-10-14  Geoffrey Keating  <geoffk@apple.com>
 
 	* aclocal.m4: Regenerate.
diff --git a/libstdc++-v3/scripts/make_exports.pl b/libstdc++-v3/scripts/make_exports.pl
index a20b2dc6f4cdfdea0fd1d241d5b7e02422fbbd78..7c9e4e31d4f878d2afec23f8abc273cc6f9af14f 100644
--- a/libstdc++-v3/scripts/make_exports.pl
+++ b/libstdc++-v3/scripts/make_exports.pl
@@ -92,7 +92,7 @@ my $nm = $ENV{'NM_FOR_TARGET'} || "nm";
 print STDERR $nm.' -P '.(join ' ',@ARGV).'|';
 open NM,$nm.' -P '.(join ' ',@ARGV).'|' or die $!;
 # Talk to c++filt through a pair of file descriptors.
-open2(*FILTIN, *FILTOUT, "c++filt --strip-underscores") or die $!;
+open2(*FILTIN, *FILTOUT, "c++filt -_") or die $!;
 NAME: while (<NM>) {
     my $i;
     chomp;