doc: info directory entries: fixes, cleanup (#1585)

This commit is contained in:
Simon Michael 2021-06-27 17:26:00 -10:00
parent 945834bff3
commit eae4922d12
4 changed files with 4 additions and 20 deletions

View File

@ -466,7 +466,6 @@ main = do
packagemanversionm4 = dir </> ".version.m4" packagemanversionm4 = dir </> ".version.m4"
packagemandatem4 = dir </> ".date.m4" packagemandatem4 = dir </> ".date.m4"
infodirentry = dir </> "dir-entry.info" infodirentry = dir </> "dir-entry.info"
infodir = dir </> "dir"
-- assume any other .m4.md files in dir are included by this one XXX not true in hledger-lib -- assume any other .m4.md files in dir are included by this one XXX not true in hledger-lib
subfiles <- liftIO $ filter (/= src) . filter (".m4.md" `isSuffixOf`) . map (dir </>) <$> S.getDirectoryContents dir subfiles <- liftIO $ filter (/= src) . filter (".m4.md" `isSuffixOf`) . map (dir </>) <$> S.getDirectoryContents dir
need $ [src, commonm4, commandsm4, packagemanversionm4, packagemandatem4, infodirentry] ++ subfiles need $ [src, commonm4, commandsm4, packagemanversionm4, packagemandatem4, infodirentry] ++ subfiles
@ -494,12 +493,12 @@ main = do
-- in Info's directory (table of contents) if these (filesystem) directories -- in Info's directory (table of contents) if these (filesystem) directories
-- are added to INFOPATH. -- are added to INFOPATH.
infodirs |%> \out -> do -- hledger/dir infodirs |%> \out -> do -- hledger/dir
let dir = takeDirectory out let outdir = takeDirectory out
infomanual = dir </> dir <.> "info" infomanual = outdir </> outdir <.> "info" -- XXX cutting corners
infodir = dir </> "dir" dirfile = outdir </> "dir"
need [infomanual] need [infomanual]
cmd_ Shell "rm -f" out cmd_ Shell "rm -f" out
cmd Shell "install-info" infomanual infodir cmd Shell "install-info" infomanual dirfile
-- WEBSITE MARKDOWN SOURCE -- WEBSITE MARKDOWN SOURCE

View File

@ -2,11 +2,6 @@
% _author_ % _author_
% _monthyear_ % _monthyear_
_info_({{INFO-DIR-SECTION User Applications}})
_info_({{START-INFO-DIR-ENTRY}})
_info_({{* HLedger-UI: (hledger-ui). Command-Line Accounting (TUI)}})
_info_({{END-INFO-DIR-ENTRY}})
_man_({{ _man_({{
# NAME # NAME
}}) }})

View File

@ -2,11 +2,6 @@
% _author_ % _author_
% _monthyear_ % _monthyear_
_info_({{INFO-DIR-SECTION User Applications}})
_info_({{START-INFO-DIR-ENTRY}})
_info_({{* HLedger-Web: (hledger-web). Command-Line Accounting (Web UI)}})
_info_({{END-INFO-DIR-ENTRY}})
_man_({{ _man_({{
# NAME # NAME
}}) }})

View File

@ -54,11 +54,6 @@ _web_({{
[Common tasks]* [Common tasks]*
}}) }})
_info_({{INFO-DIR-SECTION User Applications}})
_info_({{START-INFO-DIR-ENTRY}})
_info_({{* HLedger: (hledger). Command-Line Accounting}})
_info_({{END-INFO-DIR-ENTRY}})
_man_({{ _man_({{
# NAME # NAME
}}) }})