#REFACTORING by exept
authorClaus Gittinger <cg@exept.de>
Wed, 28 Aug 2019 11:26:12 +0200
changeset 19043 a41a0205a136
parent 19042 6e94c9d2faa0
child 19044 ede197974113
#REFACTORING by exept class: Tools::NewSystemBrowser changed: #setAcceptActionForProjectComment #switchToClass:selector:updateHistory: removed unneeded withCRs
Tools__NewSystemBrowser.st
--- a/Tools__NewSystemBrowser.st	Wed Aug 28 10:44:37 2019 +0200
+++ b/Tools__NewSystemBrowser.st	Wed Aug 28 11:26:12 2019 +0200
@@ -56657,7 +56657,7 @@
 
     (navigationState isProtocolBrowser) ifTrue:[
         self selectedMethods value:methods.
-        (self confirm:'Add a buffer for it ?' withCRs) ifTrue:[
+        (self confirm:'Add a buffer for it ?') ifTrue:[
             self spawnFullBrowserInClass:aClass selector:aSelector in:#newBuffer.
         ].
         ^ self
@@ -61897,6 +61897,7 @@
     ^ selectorCompletion
 ! !
 
+
 !NewSystemBrowser methodsFor:'private-semantic checks'!
 
 checkAcceptedMethod:aMethod inClass:aClass
@@ -65216,7 +65217,7 @@
                 ] ifFalse:[
                     codeLines := code asStringCollection withoutLeadingAndTrailingBlankLines.
                     
-                    project compile:('documentation\"\' withCRs,(codeLines asString string),'"' withCRs) categorized:#documentation.
+                    project compile:('documentation\"\' withCRs,(codeLines asString string),'"') categorized:#documentation.
                     navigationState modified:false.
                     navigationState realModifiedState:false.
                 ].