unify batch mode with non-batch by using AnnexedFileSeeker
This commit is contained in:
parent
d9ae6ab0b4
commit
1be92381ec
23 changed files with 70 additions and 74 deletions
|
@ -45,7 +45,7 @@ seek o = do
|
|||
list <- getList o
|
||||
printHeader list
|
||||
let seeker = AnnexedFileSeeker
|
||||
{ seekAction = commandAction' (start list)
|
||||
{ startAction = start list
|
||||
, checkContentPresent = Nothing
|
||||
, usesLocationLog = True
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue