Merge pull request #6486 from commercialhaskell/fix6484

Fix #6484 stack path avoids EnvConfig where possible

ChangeLog.md

@@ -13,6 +13,8 @@ Behavior changes:
 * Stack uses the version of the Cabal package that comes with the specified
   version of GHC. Stack no longer supports such Cabal versions before 2.2, which
   came with versions of GHC before 8.4.
+* `stack path --global-config`, `--programs`, and `--local-bin` no longer set
+  up Stack's environment.
 
 Other enhancements:
 

doc/path_command.md

@@ -3,9 +3,9 @@
 # The `stack path` command
 
 ~~~text
-stack path [--stack-root] [--global-config] [--project-root] [--config-location]
-           [--bin-path] [--programs] [--compiler-exe] [--compiler-bin]
-           [--compiler-tools-bin] [--local-bin] [--extra-include-dirs]
+stack path [--stack-root] [--global-config] [--programs] [--local-bin]
+           [--project-root] [--config-location] [--bin-path] [--compiler-exe]
+           [--compiler-bin] [--compiler-tools-bin] [--extra-include-dirs]
            [--extra-library-dirs] [--snapshot-pkg-db] [--local-pkg-db]
            [--global-pkg-db] [--ghc-package-path] [--snapshot-install-root]
            [--local-install-root] [--snapshot-doc-root] [--local-doc-root]

src/Stack/Options/PathParser.hs

@@ -7,15 +7,22 @@ module Stack.Options.PathParser
 
 import qualified Data.Text as T
 import           Options.Applicative ( Parser, flag, help, long )
-import           Stack.Path ( paths )
+import           Stack.Path
+                   ( pathsFromConfig, pathsFromEnvConfig, pathsFromRunner )
 import           Stack.Prelude
 
 -- | Parse command line arguments for Stack's @path@ command.
 pathParser :: Parser [Text]
 pathParser = mapMaybeA
-  ( \(desc, name, _) -> flag Nothing (Just name)
+  ( \(desc, name) -> flag Nothing (Just name)
       (  long (T.unpack name)
       <> help desc
       )
   )
   paths
+ where
+  toDescName (desc, name, _) = (desc, name)
+  paths =
+       pathsFromRunner
+    :  map toDescName pathsFromConfig
+    <> map toDescName pathsFromEnvConfig