#REFACTORING by stefan
authorStefan Vogel <sv@exept.de>
Tue, 05 Jul 2016 15:36:46 +0200
changeset 20069 4abc2e12bcec
parent 20068 b1cba7634463
child 20070 d1635271cd90
#REFACTORING by stefan class: Filename changed: #constructString:
Filename.st
--- a/Filename.st	Tue Jul 05 11:26:10 2016 +0200
+++ b/Filename.st	Tue Jul 05 15:36:46 2016 +0200
@@ -4190,12 +4190,12 @@
     |sepString sub|
 
     sub := subName asString.
+    nameString size == 0 ifTrue:[
+        ^ sub
+    ].
     sepString := self species separatorString.
-    nameString size == 0 ifTrue:[
-	^ sub
-    ].
     (nameString endsWith:sepString) ifTrue:[
-	^ nameString , sub
+        ^ nameString , sub
     ].
     ^ nameString , sepString , sub