--- a/Tools__NavigationHistory.st Tue Oct 23 14:51:09 2012 +0200
+++ b/Tools__NavigationHistory.st Tue Oct 23 15:13:20 2012 +0200
@@ -135,6 +135,14 @@
"Created: / 03-07-2011 / 13:25:37 / cg"
!
+first
+ "backward compatible list protocol"
+
+ ^ items first
+
+ "Created: / 04-07-2011 / 22:45:21 / cg"
+!
+
isEmpty
"backward compatible list protocol"
@@ -308,7 +316,7 @@
!NavigationHistory class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__NavigationHistory.st,v 1.11 2012-09-02 11:20:10 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__NavigationHistory.st,v 1.12 2012-10-23 13:13:20 cg Exp $'
!
version_CVS_jvrany