diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-11-17 17:27:24 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-11-17 17:27:24 -0400 |
| commit | 6bf2d636864753eff8a5a31b6782f381f195806b (patch) | |
| tree | dd1efa7378366962b6ee3dc214fa34aac4c0a8e3 /Utility/FreeDesktop.hs | |
| parent | 9ed65a1226cc67000b12d768d6f5e8acaada1c65 (diff) | |
use intercalate instead of MissingH's join
The two functions are identical.
Diffstat (limited to 'Utility/FreeDesktop.hs')
| -rw-r--r-- | Utility/FreeDesktop.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Utility/FreeDesktop.hs b/Utility/FreeDesktop.hs index 70332490b..f8b9fd709 100644 --- a/Utility/FreeDesktop.hs +++ b/Utility/FreeDesktop.hs @@ -59,7 +59,7 @@ toString (ListV l) | null l = "" | otherwise = (intercalate ";" $ map (escapesemi . toString) l) ++ ";" where - escapesemi = join "\\;" . split ";" + escapesemi = intercalate "\\;" . split ";" genDesktopEntry :: String -> String -> Bool -> FilePath -> Maybe String -> [String] -> DesktopEntry genDesktopEntry name comment terminal program icon categories = catMaybes |