diff --git a/dialogs/world_prefs/genpropertypage.cpp b/dialogs/world_prefs/genpropertypage.cpp
index dc46d5eb..858a24fe 100644
--- a/dialogs/world_prefs/genpropertypage.cpp
+++ b/dialogs/world_prefs/genpropertypage.cpp
@@ -1788,6 +1788,8 @@ CString strContents;
   if (!GetClipboardContents (strContents, m_doc->m_bUTF_8, false))
     return; // can't do it
 
+  GetSelectedItem (); // in case we re-load list
+
   CMemFile f ((unsigned char *) (const char *) strContents, strContents.GetLength ());
   CArchive ar (&f, CArchive::load);
   UINT iCount = 0;