#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Thu, 01 Sep 2016 17:24:27 +0200
changeset 4087 de5aae6c1261
parent 4085 797a3f8e8ef4
child 4088 aecb218b601c
child 4089 be7d2e110435
#FEATURE by cg class: CVSSourceCodeManager changed: #executeCVSCommand:module:inDirectory:log:pipe:orElseOutputTo:errorTo:
CVSSourceCodeManager.st
--- a/CVSSourceCodeManager.st	Mon Aug 22 11:27:41 2016 +0200
+++ b/CVSSourceCodeManager.st	Thu Sep 01 17:24:27 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1995 by Claus Gittinger
               All Rights Reserved
@@ -1133,7 +1135,8 @@
                                                     executeCommand:command
                                                     outputTo:errOut
                                                     errorTo:errOut
-                                                    inDirectory:pathOfDir.
+                                                    inDirectory:pathOfDir
+                                                    showWindow:false.
                                 ]
                          ] fork.
 
@@ -4726,17 +4729,17 @@
             "/ The repair code will be removed at some time in the future...
 
             "/ temporary fix Felix' bad string translation:
-            (aString startsWith:'§Header:') ifTrue:[
-                (aString endsWith:'Exp §') ifTrue:[
+            (aString startsWith:'§Header:') ifTrue:[
+                (aString endsWith:'Exp §') ifTrue:[
                     fixedString := '$' , (aString copyFrom:3 to:(aString size - 2)) , '$'.
 
                     aClass isNil ifTrue:[
                         autoFixHolder value ifFalse:[
-                            Dialog information:'Attention: the CVS version string is corrupted (§-bug). Please fix it manually'.
+                            Dialog information:'Attention: the CVS version string is corrupted (§-bug). Please fix it manually'.
                         ]
                     ] ifFalse:[
                         (autoFixHolder value 
-                            or:[ Dialog confirm:('Attention: the CVS version string is corrupted in "%1" (§-bug). Fix it?' withCRs bindWith:aClass name) ]
+                            or:[ Dialog confirm:('Attention: the CVS version string is corrupted in "%1" (§-bug). Fix it?' withCRs bindWith:aClass name) ]
                         ) ifTrue:[
                             self updateVersionMethodOf:aClass for:fixedString.
                         ].
@@ -4744,7 +4747,7 @@
                 ].
             ].
 
-            "/ temporary fix Jan's bad Umlaut-removal (which results in Felix's bad § being removed):
+            "/ temporary fix Jan's bad Umlaut-removal (which results in Felix's bad § being removed):
             (aString startsWith:'Header: ') ifTrue:[
                 (aString endsWith:'Exp ') ifTrue:[
                     fixedString := '$' , aString , '$'.