De-emphasize "clone", because it's not that simple. The removable drive may
already have an annex with content; if so it'll get synced in.
This commit is contained in:
Joey Hess 2012-08-05 15:57:30 -04:00
parent 34fc0d358e
commit a3f76fe696
3 changed files with 4 additions and 3 deletions

View file

@ -207,7 +207,7 @@ selectDriveForm drives def = renderBootstrap $ RemovableDrive
getAddDriveR :: Handler RepHtml
getAddDriveR = bootstrap (Just Config) $ do
sideBarDisplay
setTitle "Clone to a removable drive"
setTitle "Add a removable drive"
removabledrives <- liftIO $ driveList
writabledrives <- liftIO $
filterM (canWrite . T.unpack . mountPoint) removabledrives