info: Show when a remote is configured with importtree
This commit is contained in:
parent
ae21c88640
commit
15bd7d57ca
2 changed files with 4 additions and 0 deletions
|
@ -177,6 +177,9 @@ adjustExportImport r = case M.lookup "exporttree" (config r) of
|
|||
then checkPresent r'
|
||||
else \k -> anyM (checkpresent k)
|
||||
=<< getexportlocs exportdbv k
|
||||
, getInfo = do
|
||||
is <- getInfo r'
|
||||
return (is++[("import", "yes")])
|
||||
}
|
||||
|
||||
isexport dbv = return $ r
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue