Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

Loading…

Truncate the build log on each build. #1090

Merged
merged 1 commit into from

2 participants

@23Skidoo
Collaborator

Fixes #1081.

@tibbe tibbe merged commit b42d6b6 into from
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Commits on Oct 30, 2012
  1. @23Skidoo
This page is out of date. Refresh to see the latest.
Showing with 2 additions and 2 deletions.
  1. +2 −2 cabal-install/Distribution/Client/Install.hs
View
4 cabal-install/Distribution/Client/Install.hs
@@ -42,7 +42,7 @@ import System.Directory
import System.FilePath
( (</>), (<.>), takeDirectory )
import System.IO
- ( openFile, IOMode(AppendMode), stdout, hFlush, hClose )
+ ( openFile, IOMode(WriteMode), stdout, hFlush, hClose )
import System.IO.Error
( isDoesNotExistError, ioeGetFileName )
@@ -1139,7 +1139,7 @@ installUnpackedPackage verbosity buildLimit installLock numJobs
let logFileName = mkLogFileName (packageId pkg)
logDir = takeDirectory logFileName
unless (null logDir) $ createDirectoryIfMissing True logDir
- logFile <- openFile logFileName AppendMode
+ logFile <- openFile logFileName WriteMode
return (Just logFile))
(\mHandle -> case mHandle of
Just handle -> hClose handle
Something went wrong with that request. Please try again.