#DOCUMENTATION by cg
class: ChangesBrowser
comment/format in:
#extractSelectorOfMethodChange:
#sourceOfMethodChange:
changed: #checkClassIsLoaded:
--- a/ChangesBrowser.st Mon Feb 13 20:03:55 2017 +0100
+++ b/ChangesBrowser.st Mon Feb 13 20:07:48 2017 +0100
@@ -3351,7 +3351,7 @@
] ifFalse:[
answer := Dialog
confirmWithCancel:(resources
- stringWithCRs:'%1 is an autoloaded class.\I can only compare the method''s source if its loaded first.\\Shall the class be loaded now ?'
+ stringWithCRs:'%1 is an autoloaded class.\I can only compare the method''s source if it''s loaded first.\\Shall the class be loaded now ?'
with:cls name allBold)
labels:(resources array:#('Cancel' 'No for All' 'No' 'Yes'))
values:#(nil #never false true)
@@ -3376,6 +3376,8 @@
classesNotToBeAutoloaded add:cls.
^ false.
+
+ "Modified: / 13-02-2017 / 19:57:15 / cg"
!
checkSingleSelectedChange
@@ -3986,7 +3988,7 @@
!
extractSelectorOfMethodChange:changeNr
- "return a method-changes selector, or nil if its not a methodChange"
+ "return a method-changes selector, or nil if it's not a methodChange"
|source parser sel chunk aParseTree |
@@ -4033,6 +4035,7 @@
"Created: / 24-11-1995 / 14:30:46 / cg"
"Modified: / 01-05-2016 / 18:25:39 / cg"
+ "Modified (comment): / 13-02-2017 / 19:57:20 / cg"
!
fullClassNameOfChange:changeNr
@@ -4275,7 +4278,7 @@
!
sourceOfMethodChange:changeNr
- "return a method-changes source code, or nil if its not a methodChange."
+ "return a method-changes source code, or nil if it's not a methodChange."
|aStream chunk sawExcla parseTree sourceChunk sel|
@@ -4318,6 +4321,7 @@
"Created: / 05-09-1996 / 17:11:32 / cg"
"Modified: / 01-05-2016 / 18:25:53 / cg"
+ "Modified (comment): / 13-02-2017 / 19:57:25 / cg"
!
streamForChange:changeNr