Show message when a package version is not installed because it is un…

…listed
fsprojects · Aug 17, 2016 · 022e8c3 · 022e8c3
1 parent cc5c83b
commit 022e8c3
Show file tree

Hide file tree

Showing 3 changed files with 7 additions and 4 deletions.
diff --git a/RELEASE_NOTES.md b/RELEASE_NOTES.md
@@ -1,4 +1,7 @@
-#### 3.13.2 - 16.08.2016
+#### 3.13.3 - 17.08.2016
+* Show message when a package version is not installed because it is unlisted
+
+#### 3.13.2 - 17.08.2016
 * BUGFIX: Use ConcurrentDictionary correctly - https://github.com/fsprojects/Paket/pull/1853
 
 #### 3.13.0 - 12.08.2016

diff --git a/src/Paket.Core/PackageResolver.fs b/src/Paket.Core/PackageResolver.fs
@@ -489,7 +489,7 @@ let Resolve(getVersionsF, getPackageDetailsF, groupName:GroupName, globalStrateg
                         | Some exploredPackage ->
                             hasUnlisted := exploredPackage.Unlisted || !hasUnlisted
                             if exploredPackage.Unlisted && not !useUnlisted then
-                                ()
+                                tracefn "     unlisted"
                             else
                                 let nextStep =
                                     { Relax = currentStep.Relax

diff --git a/src/Paket/Paket.fsproj b/src/Paket/Paket.fsproj
@@ -30,8 +30,8 @@
     <StartAction>Project</StartAction>
     <StartProgram>paket.exe</StartProgram>
     <StartAction>Project</StartAction>
-    <StartArguments>install</StartArguments>
-    <StartWorkingDirectory>D:\code\Paket\integrationtests\scenarios\i001854-submodules\temp</StartWorkingDirectory>
+    <StartArguments>update</StartArguments>
+    <StartWorkingDirectory>D:\code\suaveondocker</StartWorkingDirectory>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
     <DebugType>pdbonly</DebugType>