wording
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:
parent
34fc0d358e
commit
a3f76fe696
3 changed files with 4 additions and 3 deletions
|
@ -207,7 +207,7 @@ selectDriveForm drives def = renderBootstrap $ RemovableDrive
|
||||||
getAddDriveR :: Handler RepHtml
|
getAddDriveR :: Handler RepHtml
|
||||||
getAddDriveR = bootstrap (Just Config) $ do
|
getAddDriveR = bootstrap (Just Config) $ do
|
||||||
sideBarDisplay
|
sideBarDisplay
|
||||||
setTitle "Clone to a removable drive"
|
setTitle "Add a removable drive"
|
||||||
removabledrives <- liftIO $ driveList
|
removabledrives <- liftIO $ driveList
|
||||||
writabledrives <- liftIO $
|
writabledrives <- liftIO $
|
||||||
filterM (canWrite . T.unpack . mountPoint) removabledrives
|
filterM (canWrite . T.unpack . mountPoint) removabledrives
|
||||||
|
|
|
@ -3,7 +3,8 @@
|
||||||
Adding a removable drive
|
Adding a removable drive
|
||||||
<p>
|
<p>
|
||||||
Clone this repository to a USB drive, memory stick, or other #
|
Clone this repository to a USB drive, memory stick, or other #
|
||||||
removable media.
|
removable media. Whenever the removable drive is plugged in, its
|
||||||
|
content will be synced with the content of this repository.
|
||||||
<p>
|
<p>
|
||||||
$if (null writabledrives)
|
$if (null writabledrives)
|
||||||
<div .span6 .alert .alert-error .alert-block>
|
<div .span6 .alert .alert-error .alert-block>
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
<div .span4>
|
<div .span4>
|
||||||
<h3>
|
<h3>
|
||||||
<a href="@{AddDriveR}">
|
<a href="@{AddDriveR}">
|
||||||
Clone to a removable drive
|
Add a removable drive
|
||||||
<p>
|
<p>
|
||||||
Clone this repository to a USB drive, memory stick, or other #
|
Clone this repository to a USB drive, memory stick, or other #
|
||||||
removable media.
|
removable media.
|
||||||
|
|
Loading…
Reference in a new issue