comment
This commit is contained in:
parent
9fe3c6d211
commit
fe5e4bdc64
1 changed files with 1 additions and 0 deletions
|
@ -34,6 +34,7 @@ start (file, attr) = isAnnexed file $ \(key, _) -> do
|
||||||
case from of
|
case from of
|
||||||
Nothing -> next $ perform key
|
Nothing -> next $ perform key
|
||||||
Just name -> do
|
Just name -> do
|
||||||
|
-- get --from = copy --from
|
||||||
src <- Remote.byName name
|
src <- Remote.byName name
|
||||||
next $ Command.Move.fromPerform src False key
|
next $ Command.Move.fromPerform src False key
|
||||||
where
|
where
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue