Merge pull request #96 from jeffreyrosenbluth/master

fixes #95
diagrams · Aug 14, 2013 · d36aae4 · d36aae4
2 parents 500b33a + b3632a6
commit d36aae4
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/Diagrams/Trail.hs b/src/Diagrams/Trail.hs
@@ -484,6 +484,8 @@ instance (InnerSpace v, RealFrac (Scalar v), Floating (Scalar v))
     => Sectionable (Trail v) where
   splitAtParam t p = withLine ((wrapLine *** wrapLine) . (`splitAtParam` p)) t
 
+  reverseDomain = reverseTrail
+
 instance (InnerSpace v, OrderedField (Scalar v), RealFrac (Scalar v))
     => HasArcLength (Trail v) where
   arcLengthBounded = withLine . arcLengthBounded