Skip to content

Commit

Permalink
Re-added internal class generated for AssemblyInfo.vb
Browse files Browse the repository at this point in the history
Was removed in 63185e7 for #673 due to
errors building. The existing code did not work because of the attempt
to put it in the System namespace, and the lack of a class name.
  • Loading branch information
allykzam committed Jun 9, 2015
1 parent 64f3244 commit 6a03c98
Showing 1 changed file with 8 additions and 1 deletion.
9 changes: 8 additions & 1 deletion src/app/FakeLib/AssemblyInfoFile.fs
Original file line number Diff line number Diff line change
Expand Up @@ -181,7 +181,14 @@ let CreateVisualBasicAssemblyInfoWithConfig outputFileName attributes (config :
|> Seq.toList
|> List.map (fun (attr : Attribute) -> sprintf "<assembly: %sAttribute(%s)>" attr.Name attr.Value))

attributeLines
let sourceLines =
if generateClass then
[ "Friend NotInheritable Class AssemblyVersionInformation"
sprintf " Friend Const Version As String = %s" (getAssemblyVersionInfo attributes)
"End Class" ]
else []

attributeLines @ sourceLines
|> writeToFile outputFileName
traceEndTask "AssemblyInfo" outputFileName

Expand Down

0 comments on commit 6a03c98

Please sign in to comment.