From 75988a790e94282aae4087a32af6275b5faa5afa Mon Sep 17 00:00:00 2001 From: "grond66@79ca29ba964cd0d8e2f352871d54452e4a9dad88" Date: Fri, 15 Jan 2021 13:07:28 +0000 Subject: [PATCH] --- ..._91__PATCH__93___incorrect_behaviour_in_expandTilde.mdwn | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/doc/bugs/__91__PATCH__93___incorrect_behaviour_in_expandTilde.mdwn b/doc/bugs/__91__PATCH__93___incorrect_behaviour_in_expandTilde.mdwn index 3573a91060..9e965967c8 100644 --- a/doc/bugs/__91__PATCH__93___incorrect_behaviour_in_expandTilde.mdwn +++ b/doc/bugs/__91__PATCH__93___incorrect_behaviour_in_expandTilde.mdwn @@ -69,7 +69,7 @@ All that needs to be done is to add an equation for `expandt` to handle the case See the following patch: ``` -From 4d8febfd5ec64516d3f77577a498f96b87ec9c9c Mon Sep 17 00:00:00 2001 +From 680873923197f5eec15365b3e47e3fa05b9573be Mon Sep 17 00:00:00 2001 From: Grond Date: Thu, 14 Jan 2021 18:16:31 -0800 Subject: [PATCH] Fix expandTilde so that it can handle tildes at the end of @@ -80,14 +80,14 @@ Subject: [PATCH] Fix expandTilde so that it can handle tildes at the end of 1 file changed, 1 insertion(+) diff --git a/Git/Construct.hs b/Git/Construct.hs -index 8b63ac480..b7f018944 100644 +index 8b63ac480..a369bc4a6 100644 --- a/Git/Construct.hs +++ b/Git/Construct.hs @@ -187,6 +187,7 @@ expandTilde = expandt True expandt True ('~':'/':cs) = do h <- myHomeDir return $ h cs -+ expandt True "~" = myHomeDir ++ expandt True "~" = myHomeDir expandt True ('~':cs) = do let (name, rest) = findname "" cs u <- getUserEntryForName name -- 2.30.2