From: Joey Hess <joeyh@joeyh.name>
Date: Wed, 21 Sep 2016 18:57:44 +0000 (-0400)
Subject: improve comment
X-Git-Tag: archive/raspbian/10.20250416-2+rpi1~1^2~301^2~25
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=99982e28300d30f1cc4fa54f61082f52c1ad6385;p=git-annex.git

improve comment
---

diff --git a/Git/Ref.hs b/Git/Ref.hs
index 6cd56271ff..257c430360 100644
--- a/Git/Ref.hs
+++ b/Git/Ref.hs
@@ -28,8 +28,10 @@ setHeadRef ref r = writeFile (headFile r) ("ref: " ++ fromRef ref)
 describe :: Ref -> String
 describe = fromRef . base
 
-{- Often git refs are fully qualified (eg: refs/heads/master).
- - Converts such a fully qualified ref into a base ref (eg: master). -}
+{- Often git refs are fully qualified 
+ - (eg refs/heads/master or refs/remotes/origin/master).
+ - Converts such a fully qualified ref into a base ref
+ - (eg: master or origin/master). -}
 base :: Ref -> Ref
 base = Ref . remove "refs/heads/" . remove "refs/remotes/" . fromRef
   where