--- a/Tools__NavigationHistory.st	Mon Nov 12 10:06:58 2012 +0100
+++ b/Tools__NavigationHistory.st	Tue Nov 13 10:07:18 2012 +0100
@@ -135,6 +135,12 @@
     "Created: / 03-07-2011 / 13:25:37 / cg"
 !
 
+do:aBlock
+    "backward compatible list protocol"
+
+    ^ items do:aBlock 
+!
+
 first
     "backward compatible list protocol"
 
@@ -332,7 +338,7 @@
 !NavigationHistory class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__NavigationHistory.st,v 1.13 2012-10-23 13:43:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__NavigationHistory.st,v 1.14 2012-11-13 09:07:18 mb Exp $'
 !
 
 version_CVS_jvrany