Skip to content

Commit

Permalink
Add more firefox prefs
Browse files Browse the repository at this point in the history
  • Loading branch information
thomasjm committed Aug 9, 2024
1 parent 8a24377 commit dce75f7
Showing 1 changed file with 15 additions and 2 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -107,15 +107,28 @@ configureDownloadCapabilities downloadDir caps@(W.Capabilities {W.browser=browse
, "application/x-gtar"
, "application/x-tgz"

, "application/octet-stream"
, "application/pdf"
, "application/zip"
]

profile <- liftIO $ FF.defaultProfile
& FF.addPref "browser.download.dir" downloadDir

& FF.addPref "browser.download.folderList" (2 :: Int)
& FF.addPref "browser.download.useDownloadDir" True

& FF.addPref "browser.download.manager.closeWhenDone" True
& FF.addPref "browser.download.manager.focusWhenStarting" False
& FF.addPref "browser.download.manager.showAlertOnComplete" False
& FF.addPref "browser.download.manager.showWhenStarting" False
& FF.addPref "browser.download.dir" downloadDir
& FF.addPref "browser.helperApps.neverAsk.saveToDisk" (T.unpack (T.intercalate "," saveToDiskMimeTypes))
& FF.addPref "browser.download.manager.useWindow" False

& FF.addPref "services.sync.prefs.sync.browser.download.manager.showWhenStarting" False

& FF.addPref "browser.helperApps.alwaysAsk.force" False
& FF.addPref "browser.helperApps.neverAsk.saveToDisk" (T.unpack (T.intercalate ", " saveToDiskMimeTypes))

& FF.prepareProfile

return (caps { W.browser = browser { W.ffProfile = Just profile } })
Expand Down

0 comments on commit dce75f7

Please sign in to comment.