Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
class: Smalltalk
authorClaus Gittinger <cg@exept.de>
Mon, 02 Mar 2015 17:06:25 +0100
changeset 17576 2d611305d7e6
parent 17575 11ce80e0ee6b
child 17577 53adcc238353
class: Smalltalk comment/format in: #removeClassNamed:
Smalltalk.st file | annotate | diff | comparison | revisions 
--- a/Smalltalk.st	Mon Mar 02 16:14:00 2015 +0100
+++ b/Smalltalk.st	Mon Mar 02 17:06:25 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1988 by Claus Gittinger
 	      All Rights Reserved
@@ -766,14 +768,15 @@
 !
 
 removeClassNamed: aName
-    "Invoked from fileouts:  if there is currently a class in the system named aName, then remove it.
-     If anything untoward happens, report it in the Transcript.  "
+    "Invoked from fileouts: if there is currently a class in the system named aName, then remove it.
+     Also needed by the refactory browser.
+     If anything untoward happens, report it in the Transcript."
 
     | oldClass |
 
     (oldClass := self at: aName asSymbol ifAbsent: [nil]) isNil ifTrue:[
-	Transcript showCR: 'Removal of class named ', aName, ' ignored because it does not exist.'.
-	^ self
+        Transcript showCR: 'Removal of class named ', aName, ' ignored because it does not exist.'.
+        ^ self
     ].
     oldClass removeFromSystem
 ! !
@@ -7909,13 +7912,13 @@
     (lang == #de) ifTrue:[
 	proto := 'Willkommen bei %1 (Version %2 von %3)'
     ] ifFalse:[ (lang == #fr) ifTrue:[
-	proto := 'Salut, Bienvenue à %1 (version %2 de %3)'
+	proto := 'Salut, Bienvenue à %1 (version %2 de %3)'
     ] ifFalse:[ (lang == #it) ifTrue:[
 	proto := 'Ciao, benvenuto al %1 (versione %2 di %3)'
     ] ifFalse:[ (lang == #es) ifTrue:[
-"/        proto := 'Hola, bienvenida a %1 (versión %2 de %3)'
+"/        proto := 'Hola, bienvenida a %1 (versión %2 de %3)'
     ] ifFalse:[ (lang == #es) ifTrue:[
-"/        proto := 'Oi, benvindo a %1 (versão %2 de %3)'
+"/        proto := 'Oi, benvindo a %1 (versão %2 de %3)'
     ] ifFalse:[ (lang == #no) ifTrue:[
 	proto := 'Hei, verdenmottakelse til %1 (versjon %2 av %3)'
     ]]]]]].
@@ -8196,11 +8199,11 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1115 2015-02-24 15:47:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1116 2015-03-02 16:06:25 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1115 2015-02-24 15:47:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.1116 2015-03-02 16:06:25 cg Exp $'
 !
 
 version_SVN
hg/stx-libbasic