--- a/Fraction.st	Wed Apr 27 17:14:06 2011 +0200
+++ b/Fraction.st	Tue May 03 11:08:52 2011 +0200
@@ -193,11 +193,11 @@
 
     "
      Fraction pi         
-     Fraction pi asFloat
+     Fraction pi asFloat - Float pi
      Float pi            
     "
 
-    "Modified: 5.11.1996 / 11:11:44 / cg"
+    "Modified: / 03-05-2011 / 11:08:46 / cg"
 !
 
 pi_approximation
@@ -1158,7 +1158,11 @@
 !Fraction class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.80 2009-09-08 11:57:25 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.81 2011-05-03 09:08:52 cg Exp $'
+!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libbasic/Fraction.st,v 1.81 2011-05-03 09:08:52 cg Exp $'
 ! !
 
 Fraction initialize!