From 71bedab81c012be50c6605ed0dbf4ef936cde05e Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Thu, 6 Jan 2011 21:04:57 -0800
Subject: LHS test changes for new wrapping & highlighting-kate version.
---
tests/lhs-test.rst+lhs | 11 +++++------
1 file changed, 5 insertions(+), 6 deletions(-)
(limited to 'tests/lhs-test.rst+lhs')
diff --git a/tests/lhs-test.rst+lhs b/tests/lhs-test.rst+lhs
index 22d54e85e..6b6ffb860 100644
--- a/tests/lhs-test.rst+lhs
+++ b/tests/lhs-test.rst+lhs
@@ -1,16 +1,16 @@
lhs test
========
-``unsplit`` is an arrow that takes a pair of values and combines
-them to return a single value:
+``unsplit`` is an arrow that takes a pair of values and combines them to
+return a single value:
> unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d
> unsplit = arr . uncurry
> -- arr (\op (x,y) -> x `op` y)
-``(***)`` combines two arrows into a new arrow by running the two
-arrows on a pair of values (one arrow on the first item of the pair
-and one arrow on the second item of the pair).
+``(***)`` combines two arrows into a new arrow by running the two arrows on a
+pair of values (one arrow on the first item of the pair and one arrow on the
+second item of the pair).
::
@@ -19,4 +19,3 @@ and one arrow on the second item of the pair).
Block quote:
foo bar
-
--
cgit v1.2.3