git-remote-annex: Display full url when using remote with the shorthand url

This commit is contained in:
Joey Hess 2024-05-24 17:15:31 -04:00
parent 04a256a0f8
commit 19418e81ee
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
7 changed files with 76 additions and 20 deletions

View file

@ -157,6 +157,7 @@ describeOtherParamsFor c t = do
( maybeAddJSONField "whatelse" $ M.fromList $ mkjson l
, liftIO $ forM_ l $ \(p, fd, vd) -> case fd of
HiddenField -> return ()
DeprecatedField -> return ()
FieldDesc d -> do
putStrLn p
putStrLn ("\t" ++ d)
@ -171,6 +172,7 @@ describeOtherParamsFor c t = do
mkjson = mapMaybe $ \(p, fd, vd) ->
case fd of
HiddenField -> Nothing
DeprecatedField -> Nothing
FieldDesc d -> Just
( T.pack p
, M.fromList