mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

improve html, add screenshots

Browse source
This commit is contained in:
Joey Hess 2016-12-27 17:13:32 -04:00
parent 7d32acdf71
commit 18f16072fb
No known key found for this signature in database
GPG key ID: C910D9222512E3C7
6 changed files with 36 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Assistant/WebApp/Configurators/Pairing.hs
View file

@ -18,16 +18,17 @@ import Assistant.DaemonStatus
import Assistant.Pairing.MakeRemote
import Assistant.Pairing.Network
import Assistant.Ssh
import Assistant.Alert
import Utility.Verifiable
#endif
import Utility.UserInfo
import Utility.Tor
import Assistant.WebApp.Pairing
import Assistant.Alert
import qualified Utility.MagicWormhole as Wormhole
import Assistant.MakeRemote
import Assistant.RemoteControl
import Assistant.Sync
import Assistant.WebApp.SideBar
import Command.P2P (unusedPeerRemoteName, PairingResult(..))
import P2P.Address
import Git
@ -57,7 +58,7 @@ startWormholePairR pairingwith = whenTorInstalled $ whenWormholeInstalled $
getPrepareWormholePairR :: PairingWith -> Handler Html
getPrepareWormholePairR pairingwith = do
enableTor
-- enableTor
myaddrs <- liftAnnex loadP2PAddresses
remotename <- liftAnnex unusedPeerRemoteName
h <- liftAssistant $