diff --git a/src/Data/AffineSpace/Point.hs b/src/Data/AffineSpace/Point.hs
--- a/src/Data/AffineSpace/Point.hs
+++ b/src/Data/AffineSpace/Point.hs
@@ -19,7 +19,7 @@
 module Data.AffineSpace.Point
        ( -- * Points
 
-         Point(..), origin, (*.)
+         Point(..), unPoint, origin, (*.)
 
        ) where
 
@@ -34,13 +34,21 @@
 --  Points  ------------------------------------------------
 ------------------------------------------------------------
 
--- | @Point@ is a newtype wrapper around vectors that we wish to treat
---   as points, so we don't get them mixed up. The distinction is
---   important: translations affect points, but leave vectors
---   unchanged.  Points are instances of the 'AffineSpace' class from
---   "Data.AffineSpace".
+-- | @Point@ is a newtype wrapper around vectors used to represent
+--   points, so we don't get them mixed up. The distinction between
+--   vectors and points is important: translations affect points, but
+--   leave vectors unchanged.  Points are instances of the
+--   'AffineSpace' class from "Data.AffineSpace".
 newtype Point v = P v
   deriving (Eq, Ord, Read, Show, Data, Typeable, Functor)
+
+-- | Convert a point @p@ into the vector from the origin to @p@.  This
+--   should be considered a \"semantically unsafe\" operation; think
+--   carefully about whether and why you need to use it.  The
+--   recommended way to do this conversion would be to write @(p
+--   '.-.' 'origin')@.
+unPoint :: Point v -> v
+unPoint (P v) = v
 
 instance Newtype (Point v) v where
   pack = P
diff --git a/vector-space-points.cabal b/vector-space-points.cabal
--- a/vector-space-points.cabal
+++ b/vector-space-points.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                vector-space-points
-version:             0.1.1.1
+version:             0.1.2.0
 synopsis:            A type for points, as distinct from vectors.
 description:         A type for points, as distinct from vectors, built on top
                      of Data.AffineSpace.
@@ -15,8 +15,8 @@
 build-type:          Simple
 cabal-version:       >=1.10
 source-repository head
-  type:     darcs
-  location: http://patch-tag.com/r/byorgey/vector-space-points
+  type:     git
+  location: git://github.com/diagrams/vector-space-points.git
 
 library
   exposed-modules:     Data.AffineSpace.Point