twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-05-19 08:30:21 -07:00
Code Issues Packages Projects Releases Wiki Activity

Update man location

Browse Source
This commit is contained in:
Spencer Janssen 2007-12-05 04:39:13 +00:00
parent 6908189698
commit c8f16a85cf
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
util/GenerateManpage.hs
View File

@ -42,6 +42,6 @@ replace :: Eq a => a -> a -> [a] -> [a]
replace x y = map (\a -> if a == x then y else a) replace x y = map (\a -> if a == x then y else a)
main = do main = do
troffBindings <- (concatMap troff . allBindings) `liftM` readFile "./Config.hs" troffBindings <- (concatMap troff . allBindings) `liftM` readFile "./XMonad/Config.hs"
let sed = unlines . replace "___KEYBINDINGS___" troffBindings . lines let sed = unlines . replace "___KEYBINDINGS___" troffBindings . lines
readFile "./man/xmonad.1.in" >>= return . sed >>= writeFile "./man/xmonad.1" readFile "./man/xmonad.1.in" >>= return . sed >>= writeFile "./man/xmonad.1"