--auto fixes
* get/copy --auto: Transfer data even if it would exceed numcopies, when preferred content settings want it. * drop --auto: Fix dropping content when there are no preferred content settings.
This commit is contained in:
parent
28cfd6776d
commit
99a8a5297c
12 changed files with 50 additions and 48 deletions
|
@ -58,7 +58,7 @@ handleDropsFrom locs rs fromhere key (Just f) knownpresentremote
|
|||
| checkcopies n = dropr r n >>= go rest
|
||||
| otherwise = noop
|
||||
|
||||
checkdrop n@(_, numcopies) u a = ifM (wantDrop u (Just f))
|
||||
checkdrop n@(_, numcopies) u a = ifM (wantDrop True u (Just f))
|
||||
( ifM (safely $ doCommand $ a (Just numcopies))
|
||||
( return $ decrcopies n
|
||||
, return n
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue