File tree 1 file changed +7
-1
lines changed
cabal-install/Distribution/Client 1 file changed +7
-1
lines changed Original file line number Diff line number Diff line change 8
8
9
9
--
10
10
-- Handling for user-specified build targets
11
+ -- Unlike "Distribution.Simple.BuildTarget" these build
12
+ -- targets also handle package qualification (so, up to
13
+ -- four levels of qualification, as opposed to the former's
14
+ -- three.)
11
15
-----------------------------------------------------------------------------
12
16
module Distribution.Client.BuildTarget (
13
17
@@ -433,7 +437,9 @@ showUserBuildTarget = intercalate ":" . components
433
437
434
438
showBuildTarget :: QualLevel -> BuildTarget PackageInfo -> String
435
439
showBuildTarget ql = showUserBuildTarget . forgetFileStatus
436
- . head . renderBuildTarget ql
440
+ . hd . renderBuildTarget ql
441
+ where hd [] = error " showBuildTarget: head"
442
+ hd (x: _) = x
437
443
438
444
439
445
-- ------------------------------------------------------------
You can’t perform that action at this time.
0 commit comments