@@ -52,6 +52,9 @@ import qualified Distribution.Text as C
5252#if MIN_VERSION_Cabal(3,7,0)
5353import qualified Distribution.Simple.PackageDescription as C
5454#endif
55+ #if MIN_VERSION_Cabal(3,14,0)
56+ import Distribution.Utils.Path (makeSymbolicPath )
57+ #endif
5558
5659import Lens.Micro
5760import Lens.Micro.Mtl
@@ -652,8 +655,16 @@ mainWithOptions Options{ optHost, optCommand } = do
652655
653656 return ()
654657
655- (pkgn,pkgv,xrev) <- pkgDescToPkgIdXrev <$> C. readGenericPackageDescription C. deafening optSyCFile
656658 SyncCabal (SyncCOptions { optSyCFile, optSyCIncrRev, optSyCForce }) -> do
659+ (pkgn,pkgv,xrev) <- pkgDescToPkgIdXrev <$>
660+ C. readGenericPackageDescription
661+ C. deafening
662+ #if MIN_VERSION_Cabal(3,14,0)
663+ Nothing
664+ (makeSymbolicPath optSyCFile)
665+ #else
666+ optSyCFile
667+ #endif
657668 cab0 <- BS. readFile optSyCFile
658669
659670 BS8. putStrLn $ mconcat [ " local : "
@@ -736,7 +747,15 @@ mainWithOptions Options{ optHost, optCommand } = do
736747 putStrLn $ " Using Hackage credentials for username " ++ show username
737748
738749 forM_ optPsCFiles $ \ fn -> do
739- (pkgn, pkgv, xrev0) <- pkgDescToPkgIdXrev <$> C. readGenericPackageDescription C. deafening fn
750+ (pkgn, pkgv, xrev0) <- pkgDescToPkgIdXrev <$>
751+ C. readGenericPackageDescription
752+ C. deafening
753+ #if MIN_VERSION_Cabal(3,14,0)
754+ Nothing
755+ (makeSymbolicPath fn)
756+ #else
757+ fn
758+ #endif
740759 let xrev = applyWhen optPsCIncrRev (+ 1 ) xrev0
741760
742761 putStrLn $ concat [ " Pushing " , show fn
0 commit comments