diff options
author | michaelt <what_is_it_to_do_anything@yahoo.com> | 2013-10-23 12:56:19 -0400 |
---|---|---|
committer | michaelt <what_is_it_to_do_anything@yahoo.com> | 2013-10-23 12:56:19 -0400 |
commit | 1d2434b57d4f810867794e68432468b0a200aab1 (patch) | |
tree | 1c132aef378ca663bc5c9bf1ab9d9fc8ba77770b | |
parent | 434362b1d2ef75552f1328e47ad293e1f4c59cf1 (diff) | |
download | text-pipes-1d2434b57d4f810867794e68432468b0a200aab1.tar.gz text-pipes-1d2434b57d4f810867794e68432468b0a200aab1.tar.zst text-pipes-1d2434b57d4f810867794e68432468b0a200aab1.zip |
forgot to export some pipes
-rw-r--r-- | Pipes/Text.hs | 3 | ||||
-rw-r--r-- | README.md | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/Pipes/Text.hs b/Pipes/Text.hs index d811ab5..a3e85b2 100644 --- a/Pipes/Text.hs +++ b/Pipes/Text.hs | |||
@@ -82,6 +82,9 @@ module Pipes.Text ( | |||
82 | encodeUtf8, | 82 | encodeUtf8, |
83 | pack, | 83 | pack, |
84 | unpack, | 84 | unpack, |
85 | toCaseFold, | ||
86 | toLower, | ||
87 | toUpper, | ||
85 | stripStart, | 88 | stripStart, |
86 | 89 | ||
87 | -- * Folds | 90 | -- * Folds |
@@ -11,7 +11,7 @@ though `decodeUtf8` will then not exist. | |||
11 | hi<Return> | 11 | hi<Return> |
12 | hi | 12 | hi |
13 | quit<Return> | 13 | quit<Return> |
14 | >>> runSafeT $ runEffect $ readFile "README.md" >-> map toUpper >-> hoist lift stdout | 14 | >>> runSafeT $ runEffect $ readFile "README.md" >-> toUpper >-> hoist lift stdout |
15 | TEXT-PIPES | 15 | TEXT-PIPES |
16 | ========== | 16 | ========== |
17 | ... \ No newline at end of file | 17 | ... \ No newline at end of file |