--- a/ApplicationModel.st	Tue Nov 07 15:19:03 2000 +0100
+++ b/ApplicationModel.st	Tue Nov 07 15:33:17 2000 +0100
@@ -6,9 +6,10 @@
 	instanceVariableNames:'long filesize'
 	classVariableNames:''
 	poolDictionaries:''
-	category:'A-Exchange'
+	category:'Description'
 !
 
+
 !MP3FileHeader class methodsFor:'instance creation'!
 
 from: aFilename
@@ -194,3 +195,8 @@
     ^ 2 - ( long bitAt: ( 32 - 12 ) ).
 ! !
 
+!MP3FileHeader class methodsFor:'documentation'!
+
+version
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.146 2000-11-07 14:33:17 martin Exp $'
+! !