Mercurial Mercurial > hg > stx-libtool / 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.
showCr: -> showCR:
authorClaus Gittinger <cg@exept.de>
Sat, 18 May 1996 16:16:44 +0200
changeset 550 c8d443ad8a96
parent 549 4ed344b70424
child 551 9c94cf577a45
showCr: -> showCR:
SBrowser.st file | annotate | diff | comparison | revisions
SystemBrowser.st file | annotate | diff | comparison | revisions 
--- a/SBrowser.st	Sat May 18 15:59:37 1996 +0200
+++ b/SBrowser.st	Sat May 18 16:16:44 1996 +0200
@@ -1160,7 +1160,7 @@
 
             (checkedClasses includes:cls) ifFalse:[
                 cls isObsolete ifTrue:[
-                    Transcript showCr:'skipping obsolete class: ' , cls displayString
+                    Transcript showCR:'skipping obsolete class: ' , cls displayString
                 ] ifFalse:[
                     methodArray := cls methodArray.
                     selectorArray := cls selectorArray.
@@ -1185,11 +1185,11 @@
              implementors or senders)
             "
             wantInst ifTrue:[
-"/                Transcript show:'searching '; show:aClass name; showCr:' ...'; endEntry.
+"/                Transcript show:'searching '; show:aClass name; showCR:' ...'; endEntry.
                 checkBlock value:aClass
             ].
             wantClass ifTrue:[
-"/                Transcript show:'searching '; show:aClass class name; showCr:' ...'; endEntry.
+"/                Transcript show:'searching '; show:aClass class name; showCR:' ...'; endEntry.
                 checkBlock value:(aClass class)
             ].
             Processor yield
@@ -1198,6 +1198,7 @@
     ^ self browseMethods:list title:title
 
     "Created: 10.12.1995 / 15:34:57 / cg"
+    "Modified: 18.5.1996 / 15:44:58 / cg"
 !
 
 browseMethodsIn:aCollectionOfClasses where:aBlock title:title
@@ -1282,6 +1283,6 @@
 !SystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/SBrowser.st,v 1.56 1996-04-30 13:00:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/SBrowser.st,v 1.57 1996-05-18 14:16:44 cg Exp $'
 ! !
 SystemBrowser initialize!
--- a/SystemBrowser.st	Sat May 18 15:59:37 1996 +0200
+++ b/SystemBrowser.st	Sat May 18 16:16:44 1996 +0200
@@ -1160,7 +1160,7 @@
 
             (checkedClasses includes:cls) ifFalse:[
                 cls isObsolete ifTrue:[
-                    Transcript showCr:'skipping obsolete class: ' , cls displayString
+                    Transcript showCR:'skipping obsolete class: ' , cls displayString
                 ] ifFalse:[
                     methodArray := cls methodArray.
                     selectorArray := cls selectorArray.
@@ -1185,11 +1185,11 @@
              implementors or senders)
             "
             wantInst ifTrue:[
-"/                Transcript show:'searching '; show:aClass name; showCr:' ...'; endEntry.
+"/                Transcript show:'searching '; show:aClass name; showCR:' ...'; endEntry.
                 checkBlock value:aClass
             ].
             wantClass ifTrue:[
-"/                Transcript show:'searching '; show:aClass class name; showCr:' ...'; endEntry.
+"/                Transcript show:'searching '; show:aClass class name; showCR:' ...'; endEntry.
                 checkBlock value:(aClass class)
             ].
             Processor yield
@@ -1198,6 +1198,7 @@
     ^ self browseMethods:list title:title
 
     "Created: 10.12.1995 / 15:34:57 / cg"
+    "Modified: 18.5.1996 / 15:44:58 / cg"
 !
 
 browseMethodsIn:aCollectionOfClasses where:aBlock title:title
@@ -1282,6 +1283,6 @@
 !SystemBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.56 1996-04-30 13:00:55 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SystemBrowser.st,v 1.57 1996-05-18 14:16:44 cg Exp $'
 ! !
 SystemBrowser initialize!
hg/stx-libtool