diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-04-20 19:35:33 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-04-20 19:35:33 -0400 |
| commit | 41b605ce3a7f4b4ae8cffc98987c027f72feef60 (patch) | |
| tree | 094bf3af7b31a63f40b648f97bc082de2465169e /Build/DesktopFile.hs | |
| parent | 2fec34c67e34fcbca4bc543f9f7e72c51a444321 (diff) | |
recent change broke this
Diffstat (limited to 'Build/DesktopFile.hs')
| -rw-r--r-- | Build/DesktopFile.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Build/DesktopFile.hs b/Build/DesktopFile.hs index abb5788a8..6c62b88bc 100644 --- a/Build/DesktopFile.hs +++ b/Build/DesktopFile.hs @@ -17,6 +17,7 @@ import Utility.Monad import Locations.UserConfig import Utility.OSX import Assistant.Install.AutoStart +import Assistant.Install.Menu import Control.Applicative import System.Directory @@ -42,7 +43,7 @@ inDestDir f = do writeFDODesktop :: FilePath -> IO () writeFDODesktop command = do datadir <- ifM systemwideInstall ( return systemDataDir, userDataDir ) - writeDesktopMenuFile (desktop command) + installMenu command =<< inDestDir (desktopMenuFilePath "git-annex" datadir) configdir <- ifM systemwideInstall ( return systemConfigDir, userConfigDir ) |