* txr.1: partition example: wrong use of where function.

1 files changed, 2 insertions, 2 deletions

diff --git a/txr.1 b/txr.1
index 90c1faef..04c1ab6d 100644
--- a/txr.1
+++ b/txr.1
@@ -14853,8 +14853,8 @@ of one element.
   (partition '(1 2 3) 1) -> ((1) (2 3))
 
   ;; split the string where there is a "b"
-  (partition "abcbcbd" (op where @1 (op eql #\eb))) -> ("a" "bc"
-                                                       "bc" "bd")
+  (partition "abcbcbd" (op where (op eql #\eb))) -> ("a" "bc"
+                                                    "bc" "bd")
 .cble
 
 .coNP Function @ partition*