- Smalltalk jv
authorJan Vrany <jan.vrany@fit.cvut.cz>
Wed, 05 Dec 2012 10:48:53 +0000
branchjv
changeset 17997 5c30feac5948
parent 17996 0fd959f71d7c
child 17998 6583ae0051cc
- Smalltalk class: Smalltalk comment/format in: #fileNameForClass:
Smalltalk.st
--- a/Smalltalk.st	Tue Dec 04 17:54:57 2012 +0000
+++ b/Smalltalk.st	Wed Dec 05 10:48:53 2012 +0000
@@ -6229,8 +6229,6 @@
     (compatQuery notNil
       and:[compatQuery isLoaded
         and:[(compatPkg := compatQuery query) notNil]]) ifTrue:[
-            | cls |
-
             nm := aClassOrClassName isBehavior
                 ifTrue:[aClassOrClassName name]
                 ifFalse:[aClassOrClassName].
@@ -6295,6 +6293,7 @@
 
     "Modified: / 06-10-2006 / 16:16:01 / cg"
     "Modified: / 04-12-2012 / 17:44:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified (format): / 05-12-2012 / 10:47:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 filenameAbbreviations
@@ -7850,7 +7849,7 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Id: Smalltalk.st 10879 2012-12-04 17:54:57Z vranyj1 $'
+    ^ '$Id: Smalltalk.st 10880 2012-12-05 10:48:53Z vranyj1 $'
 !
 
 version_CVS
@@ -7858,5 +7857,5 @@
 !
 
 version_SVN
-    ^ '$Id:: Smalltalk.st 10879 2012-12-04 17:54:57Z vranyj1                                                                        $'
+    ^ '$Id:: Smalltalk.st 10880 2012-12-05 10:48:53Z vranyj1                                                                        $'
 ! !