From 32150e7097d1ed69357b03f51f66348bc4f38e3f Mon Sep 17 00:00:00 2001
From: Mark Harrah <dmharrah@gmail.com>
Date: Tue, 10 Aug 2010 08:40:14 -0400
Subject: [PATCH] type alias A ~>| B for [T]A[T] => Option[B[T]]

---
 util/collection/TypeFunctions.scala | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/util/collection/TypeFunctions.scala b/util/collection/TypeFunctions.scala
index 942a00d72..92a5fb4b7 100644
--- a/util/collection/TypeFunctions.scala
+++ b/util/collection/TypeFunctions.scala
@@ -17,6 +17,8 @@ trait TypeFunctions
 	implicit def toFn1[A,B](f: A => B): Fn1[A,B] = new Fn1[A,B] {
 		def ∙[C](g: C => A) = f compose g
 	}
+	
+	type ~>|[A[_],B[_]] = A ~> Compose[Option, B]#Apply
 }
 object TypeFunctions extends TypeFunctions