Resolved merge.

[factor.git] / basis / documents / documents-tests.factor

diff --git a/basis/documents/documents-tests.factor b/basis/documents/documents-tests.factor
index b0ff3bc8d8876a6e22501045949f0a2184ab535e..9f7f25c56ea23d7a912ece51dac2b6e85124545e 100644 (file)
--- a/basis/documents/documents-tests.factor
+++ b/basis/documents/documents-tests.factor
@@ -120,7 +120,7 @@ namespaces tools.test make arrays kernel fry ;
 [ "Goodbye, cruel world." ] [ "d" get doc-string ] unit-test
 
 [ "" { 0 9 } { 0 15 } ] [
-    "d" get undos>> peek
+    "d" get undos>> last
     [ old-string>> ] [ from>> ] [ new-to>> ] tri
 ] unit-test
 
@@ -150,4 +150,4 @@ namespaces tools.test make arrays kernel fry ;
 
 [ ] [ "Hello world" "d" get set-doc-string ] unit-test
 
-[ { "" } ] [ "value" get ] unit-test
\ No newline at end of file
+[ { "" } ] [ "value" get ] unit-test