move if-zero etc to math, remove 1-/1+ from math

[factor.git] / basis / xmode / marker / marker.factor

diff --git a/basis/xmode/marker/marker.factor b/basis/xmode/marker/marker.factor
index febfc2b40f6a189a38c8b19251ce62025a1c3ded..d3a4f1e9a22a17c99af1bc999e4a4a159a53bdac 100755 (executable)
--- a/basis/xmode/marker/marker.factor
+++ b/basis/xmode/marker/marker.factor
@@ -257,7 +257,7 @@ M: mark-previous-rule handle-rule-start
         drop
 
         seen-whitespace-end? get [
-            position get 1+ whitespace-end set
+            position get 1 + whitespace-end set
         ] unless
 
         (check-word-break)