diff options
| author | Mirek Kratochvil <exa.exa@gmail.com> | 2023-10-23 20:05:46 +0200 |
|---|---|---|
| committer | Mirek Kratochvil <exa.exa@gmail.com> | 2023-10-23 20:44:49 +0200 |
| commit | 7a60fce085b5ae8d9f17699489415f20a5f18f8c (patch) | |
| tree | d5e6e55a5aaa16423f754ed457d1f1721b6f81b5 /reploy.hs | |
| parent | e3d1f22ff17e82c530ba755824600fd033283538 (diff) | |
| download | reploy-7a60fce085b5ae8d9f17699489415f20a5f18f8c.tar.gz reploy-7a60fce085b5ae8d9f17699489415f20a5f18f8c.tar.bz2 | |
switch to a safe version of </>
Diffstat (limited to 'reploy.hs')
| -rw-r--r-- | reploy.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -306,7 +306,7 @@ installRedirect target' from = do target <- rootedPageLink target' tname <- use redirectTemplate templ <- use $ templates . to (M.! fromString tname) - file <- indexFilename from + file <- indexFilename (unAbsolute from) checkTarget file io $ do putStrLn $ "@ -> " ++ file ++ " -> " ++ target |