From 01333f315f430755ba58053cb5523b4853e8b6ea Mon Sep 17 00:00:00 2001 From: Florian Kroenert Date: Wed, 8 Jun 2016 16:15:57 +0200 Subject: [PATCH] Fixed issue in bulk component creation functions where IDs where invalid --- src/app/FakeLib/WiXHelper.fs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/app/FakeLib/WiXHelper.fs b/src/app/FakeLib/WiXHelper.fs index 2106f65de03..80c16436086 100644 --- a/src/app/FakeLib/WiXHelper.fs +++ b/src/app/FakeLib/WiXHelper.fs @@ -522,7 +522,7 @@ let bulkComponentCreation fileFilter directoryInfo architecture = |> Seq.filter fileFilter |> Seq.map (fun file -> { - Id = "f" + file.Name.GetHashCode().ToString().Replace("-", "") + Id = getFileId(file.FullName) Name = file.Name Source = file.FullName ProcessorArchitecture = architecture @@ -544,7 +544,7 @@ let bulkComponentCreation fileFilter directoryInfo architecture = /// The components are embedded into the passed in root directory. let bulkComponentCreationAsSubDir fileFilter (directoryInfo : DirectoryInfo) architecture = { - Id = (directoryInfo.FullName.GetHashCode().ToString()) + Id = getDirectoryId(directoryInfo.FullName) Name = directoryInfo.Name Files = [] Components = bulkComponentCreation fileFilter directoryInfo architecture