[editor] Fix duplicate map meta entries resulting in editor suspending. (#543)

* [editor] Fix duplicate map meta entries resulting in editor suspending.

* added debug messages

Author: chris1384

[editor]/editor_main/server/resourcehooks.lua

@@ -101,8 +101,12 @@ function getResourceFiles ( resource, fileType )
 		local file = xmlNodeGetAttribute ( node, "src" )
 		local otherAttributes = xmlNodeGetAttributes ( node )
 		otherAttributes.src = nil
-		fileAttributes[file] = otherAttributes
-		table.insert ( files, file )
+		if fileAttributes[file] then
+			outputDebugString("getResourceFiles: Found duplicate meta entry in '".. resource .."' (".. fileType .. " - ".. file .. ")")
+		else
+			fileAttributes[file] = otherAttributes
+			table.insert ( files, file )
+		end
 		i = i + 1
 	end
 	xmlUnloadFile ( meta )
@@ -118,10 +122,15 @@ function copyResourceFiles ( fromResource, targetResource )
 		local paths, attr = getResourceFiles(fromResource, fileType)
 		if paths then
 			for j,filePath in ipairs(paths) do
-				fileCopy ( ":" .. getResourceName(fromResource) .. "/" .. filePath, ":" .. getResourceName(targetResource) .. "/" .. filePath, false )
-				local data = attr[filePath]
-				data.src = filePath
-				table.insert ( targetPaths[fileType], data )
+				local copyPath, copyTarget = ":" .. getResourceName(fromResource) .. "/" .. filePath, ":" .. getResourceName(targetResource) .. "/" .. filePath
+				if fileExists(copyTarget) then
+					outputDebugString("copyResourceFiles: File '".. copyTarget .."' has duplicate meta entries, cannot overwrite.")
+				else
+					fileCopy ( copyPath, copyTarget, false )
+					local data = attr[filePath]
+					data.src = filePath
+					table.insert ( targetPaths[fileType], data )
+				end
 			end
 		else
 			outputDebugString("copyResourceFiles: getResourceFiles returned "..tostring(paths).." and "..tostring(attr).." for "..tostring(fromResource).." and "..tostring(fileType))