How do you make a self-aligning arrow with charts?

I would like to do something like this:

p = p2 (0,0)
shaft = arc xDir (-5/6 @@ turn)
example = ( arrowBetween' (with & arrowShaft .~ shaft) p p)

      

        
        
        
      

    

But of course I get the error: "Scale by zero! Halp!"

I understand why this doesn't work with the existing implementation arrowBetween'

, as it calls arrow'

which scales the shaft by the difference between the endpoints. However, this should be possible. It's not uncommon to see an arrow loop where it starts in charts.