from_rc :: IO OptionalConfiguration
from_rc = do
- cfg <- DC.load [ DC.Optional "$(HOME)/.htsnrc" ]
+ cfg <- DC.load [ DC.Optional "/etc/htsnrc",
+ DC.Optional "$(HOME)/.htsnrc" ]
cfg_password <- DC.lookup cfg "password"
cfg_output_directory <- DC.lookup cfg "output_directory"
cfg_username <- DC.lookup cfg "username"