diff --git a/ld/ChangeLog b/ld/ChangeLog
index 5acde0014e..f86b73680c 100644
--- a/ld/ChangeLog
+++ b/ld/ChangeLog
@@ -1,3 +1,9 @@
+2001-06-15  Hans-Peter Nilsson  <hp@axis.com>
+
+	* lexsup.c (parse_args) <case OPTION_EXPORT_DYNAMIC, case 'E'>:
+	Set new link_info member export_dynamic.
+	* ldmain.c (main): Initialize new link_info member export_dynamic.
+
 2001-06-12  Nick Clifton  <nickc@cambridge.redhat.com>
 
 	* ldlang.c (walk_wild): Only call walk_wild_file if
diff --git a/ld/ldmain.c b/ld/ldmain.c
index 928aa84102..62d891cc18 100644
--- a/ld/ldmain.c
+++ b/ld/ldmain.c
@@ -219,6 +219,7 @@ main (argc, argv)
   link_info.emitrelocations = false;
   link_info.shared = false;
   link_info.symbolic = false;
+  link_info.export_dynamic = false;
   link_info.static_link = false;
   link_info.traditional_format = false;
   link_info.optimize = false;
diff --git a/ld/lexsup.c b/ld/lexsup.c
index 5a17985578..125bf73c35 100644
--- a/ld/lexsup.c
+++ b/ld/lexsup.c
@@ -667,6 +667,7 @@ parse_args (argc, argv)
 	case OPTION_EXPORT_DYNAMIC:
 	case 'E': /* HP/UX compatibility.  */
 	  command_line.export_dynamic = true;
+	  link_info.export_dynamic = true;
 	  break;
 	case 'e':
 	  lang_add_entry (optarg, true);