Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
Packages
Cabal
Commits
94b5d602
Commit
94b5d602
authored
Dec 17, 2007
by
Duncan Coutts
Browse files
Don't append '.' to filename in message. Make config file end in a new line.
parent
b8e9e939
Changes
1
Hide whitespace changes
Inline
Side-by-side
cabal-install/Hackage/Config.hs
View file @
94b5d602
...
...
@@ -158,7 +158,7 @@ loadConfig configFile =
minp
<-
readFileIfExists
configFile
case
minp
of
Nothing
->
do
hPutStrLn
stderr
$
"Config file "
++
configFile
++
" not found."
hPutStrLn
stderr
$
"Writing default configuration to "
++
configFile
++
"."
hPutStrLn
stderr
$
"Writing default configuration to "
++
configFile
writeDefaultConfigFile
configFile
defaultConf
return
defaultConf
Just
inp
->
case
parseBasicStanza
configFieldDescrs
defaultConf
inp
of
...
...
@@ -174,7 +174,7 @@ loadConfig configFile =
writeDefaultConfigFile
::
FilePath
->
ConfigFlags
->
IO
()
writeDefaultConfigFile
file
cfg
=
do
createDirectoryIfMissing
True
(
takeDirectory
file
)
writeFile
file
$
showFields
configWriteFieldDescrs
cfg
writeFile
file
$
showFields
configWriteFieldDescrs
cfg
++
"
\n
"
showConfig
::
ConfigFlags
->
String
showConfig
=
showFields
configFieldDescrs
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment