--- a/Number.st	Tue Oct 27 17:42:08 2015 +0100
+++ b/Number.st	Tue Oct 27 19:30:26 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1988 by Claus Gittinger
               All Rights Reserved
@@ -14,10 +16,10 @@
 "{ NameSpace: Smalltalk }"
 
 ArithmeticValue subclass:#Number
-        instanceVariableNames:''
-        classVariableNames:'DecimalPointCharacterForPrinting DecimalPointCharactersForReading'
-        poolDictionaries:''
-        category:'Magnitude-Numbers'
+	instanceVariableNames:''
+	classVariableNames:'DecimalPointCharacterForPrinting DecimalPointCharactersForReading'
+	poolDictionaries:''
+	category:'Magnitude-Numbers'
 !
 
 !Number class methodsFor:'documentation'!
@@ -1344,7 +1346,8 @@
 !
 
 log:aNumber
-    "return log base aNumber of the receiver"
+    "return log base aNumber of the receiver.
+     This will usually return a float value"
 
     ^ self ln / aNumber ln
 
@@ -2513,10 +2516,10 @@
 !Number class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Number.st,v 1.162 2015-05-07 13:57:44 stefan Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Number.st,v 1.162 2015-05-07 13:57:44 stefan Exp $'
+    ^ '$Header$'
 ! !