Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
history back forward is running now
authorpenk
Wed, 04 Dec 2002 18:10:53 +0100
changeset 4348 6fca56fb8d4e
parent 4347 c70ee320b68c
child 4349 4a6287f26d3b
history back forward is running now
FileBrowserV2Tests.st file | annotate | diff | comparison | revisions 
--- a/FileBrowserV2Tests.st	Wed Dec 04 18:05:18 2002 +0100
+++ b/FileBrowserV2Tests.st	Wed Dec 04 18:10:53 2002 +0100
@@ -81,19 +81,19 @@
 
     history := AbstractFileBrowser directoryHistoryClass new.
     history resetForwardBackward.
-    self shouldnt: (history canBack).
+    self shouldnt: (history canBackward).
     history addToHistory:'1'.
-    self shouldnt:(history canBack).
+    self shouldnt:(history canBackward).
     self shouldnt:(history canForward).
     history addToHistory:'2'.
-    self should:(history canBack).
+    self should:(history canBackward).
     history addToHistory:'3'.
-    self should:(history canBack).
+    self should:(history canBackward).
     self shouldnt: (history canForward).
-    self should: ((history goBack) = '2').
-    self should: ((history goBack) = '1').
+    self should: ((history goBackward) = '2').
+    self should: ((history goBackward) = '1').
     self should: (history canForward).
-    self should: ((history goForward) = '3').
+    self should: ((history goForward) = '2').
     self should: (history canForward).
 
     
@@ -143,5 +143,5 @@
 !FileBrowserV2Tests class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2Tests.st,v 1.5 2002-12-04 09:36:13 penk Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2Tests.st,v 1.6 2002-12-04 17:10:53 penk Exp $'
 ! !
hg/stx-libtool