Mercurial Mercurial > hg > stx-libview2 / 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 17:37:16 +0200
changeset 268 1998023f12dc
parent 267 7542f7cb2786
child 269 6c70d392634b
showCr: -> showCR:
AspctAdptr.st file | annotate | diff | comparison | revisions
AspectAdaptor.st file | annotate | diff | comparison | revisions
BlockValue.st file | annotate | diff | comparison | revisions
BuffValHldr.st file | annotate | diff | comparison | revisions
BufferedValueHolder.st file | annotate | diff | comparison | revisions
HersheyFont.st file | annotate | diff | comparison | revisions
Plug.st file | annotate | diff | comparison | revisions
PlugAdptr.st file | annotate | diff | comparison | revisions
PluggableAdaptor.st file | annotate | diff | comparison | revisions
PrintConv.st file | annotate | diff | comparison | revisions
PrintConverter.st file | annotate | diff | comparison | revisions
TriggerVal.st file | annotate | diff | comparison | revisions
TriggerValue.st file | annotate | diff | comparison | revisions
ValHolder.st file | annotate | diff | comparison | revisions
ValueHolder.st file | annotate | diff | comparison | revisions 
--- a/AspctAdptr.st	Sat May 18 15:56:05 1996 +0200
+++ b/AspctAdptr.st	Sat May 18 17:37:16 1996 +0200
@@ -92,7 +92,7 @@
         dialog open.
 
         dialog accepted ifTrue:[
-            Transcript showCr:'data now: ' , data printString
+            Transcript showCR:'data now: ' , data printString
         ]
                                                                         [exEnd]
 
@@ -136,7 +136,7 @@
         dataModel inspect.
         dialog open.
         dialog accepted ifTrue:[
-            Transcript showCr:'data now: ' , data printString
+            Transcript showCR:'data now: ' , data printString
         ]
                                                                         [exEnd]
 "
@@ -240,5 +240,5 @@
 !AspectAdaptor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/AspctAdptr.st,v 1.13 1996-05-02 13:27:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/AspctAdptr.st,v 1.14 1996-05-18 15:36:59 cg Exp $'
 ! !
--- a/AspectAdaptor.st	Sat May 18 15:56:05 1996 +0200
+++ b/AspectAdaptor.st	Sat May 18 17:37:16 1996 +0200
@@ -92,7 +92,7 @@
         dialog open.
 
         dialog accepted ifTrue:[
-            Transcript showCr:'data now: ' , data printString
+            Transcript showCR:'data now: ' , data printString
         ]
                                                                         [exEnd]
 
@@ -136,7 +136,7 @@
         dataModel inspect.
         dialog open.
         dialog accepted ifTrue:[
-            Transcript showCr:'data now: ' , data printString
+            Transcript showCR:'data now: ' , data printString
         ]
                                                                         [exEnd]
 "
@@ -240,5 +240,5 @@
 !AspectAdaptor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/AspectAdaptor.st,v 1.13 1996-05-02 13:27:47 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/AspectAdaptor.st,v 1.14 1996-05-18 15:36:59 cg Exp $'
 ! !
--- a/BlockValue.st	Sat May 18 15:56:05 1996 +0200
+++ b/BlockValue.st	Sat May 18 17:37:16 1996 +0200
@@ -67,7 +67,7 @@
         val2 := false asValue.
         both := BlockValue 
                     with:[:v1 :v2 | 
-                            Transcript showCr:'evaluating ...'.
+                            Transcript showCR:'evaluating ...'.
                             v1 value and:[v2 value]
                          ] 
                     arguments:(Array with:val1 with:val2).
@@ -281,6 +281,6 @@
 !BlockValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/BlockValue.st,v 1.6 1996-04-27 17:59:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/BlockValue.st,v 1.7 1996-05-18 15:37:01 cg Exp $'
 ! !
 BlockValue initialize!
--- a/BuffValHldr.st	Sat May 18 15:56:05 1996 +0200
+++ b/BuffValHldr.st	Sat May 18 17:37:16 1996 +0200
@@ -73,7 +73,7 @@
 
         dialog open.
 
-        Transcript show:firstName value; show:' '; showCr:lastName value
+        Transcript show:firstName value; show:' '; showCR:lastName value
                                                                         [exEnd]
 
 
@@ -110,7 +110,7 @@
             trigger value:true
         ].
 
-        Transcript show:firstName value; show:' '; showCr:lastName value
+        Transcript show:firstName value; show:' '; showCR:lastName value
                                                                         [exEnd]
 "
 ! !
@@ -204,5 +204,5 @@
 !BufferedValueHolder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/BuffValHldr.st,v 1.10 1996-04-27 17:58:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/BuffValHldr.st,v 1.11 1996-05-18 15:37:03 cg Exp $'
 ! !
--- a/BufferedValueHolder.st	Sat May 18 15:56:05 1996 +0200
+++ b/BufferedValueHolder.st	Sat May 18 17:37:16 1996 +0200
@@ -73,7 +73,7 @@
 
         dialog open.
 
-        Transcript show:firstName value; show:' '; showCr:lastName value
+        Transcript show:firstName value; show:' '; showCR:lastName value
                                                                         [exEnd]
 
 
@@ -110,7 +110,7 @@
             trigger value:true
         ].
 
-        Transcript show:firstName value; show:' '; showCr:lastName value
+        Transcript show:firstName value; show:' '; showCR:lastName value
                                                                         [exEnd]
 "
 ! !
@@ -204,5 +204,5 @@
 !BufferedValueHolder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/BufferedValueHolder.st,v 1.10 1996-04-27 17:58:45 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/BufferedValueHolder.st,v 1.11 1996-05-18 15:37:03 cg Exp $'
 ! !
--- a/HersheyFont.st	Sat May 18 15:56:05 1996 +0200
+++ b/HersheyFont.st	Sat May 18 17:37:16 1996 +0200
@@ -85,7 +85,7 @@
     ].
 
     GlyphData isNil ifTrue:[
-	Transcript showCr:'reading hershey glyphs ...'.
+	Transcript showCR:'reading hershey glyphs ...'.
 	GlyphData := OrderedCollection new:4000; grow:4000.
 	b5 := String new:5.
 	b3 := String new:3.
@@ -138,7 +138,7 @@
 
     moves := GlyphData at:glyphNo.
     moves isNil ifTrue:[
-	Transcript showCr:('no glyph for ' , glyphNo printString).
+	Transcript showCR:('no glyph for ' , glyphNo printString).
 	^ self
     ].
     savedLW := aGC lineWidth.
@@ -187,7 +187,7 @@
 
     moves := GlyphData at:glyphNo.
     moves isNil ifTrue:[
-	Transcript showCr:('no glyph for ' , glyphNo printString).
+	Transcript showCR:('no glyph for ' , glyphNo printString).
 	^ 0
     ].
 
@@ -203,7 +203,7 @@
 
     moves := GlyphData at:glyphNo.
     moves isNil ifTrue:[
-	Transcript showCr:('no glyph for ' , glyphNo printString).
+	Transcript showCR:('no glyph for ' , glyphNo printString).
 	^ 0
     ].
 
--- a/Plug.st	Sat May 18 15:56:05 1996 +0200
+++ b/Plug.st	Sat May 18 17:37:16 1996 +0200
@@ -62,8 +62,8 @@
     |plug|
 
     plug := Plug new.
-    plug respondTo:#foo  with:[Transcript showCr:'received foo'].
-    plug respondTo:#foo: with:[:arg | Transcript showCr:'received foo: ', arg printString].
+    plug respondTo:#foo  with:[Transcript showCR:'received foo'].
+    plug respondTo:#foo: with:[:arg | Transcript showCR:'received foo: ', arg printString].
 
     plug foo.
     plug foo:'some argument'
@@ -84,14 +84,14 @@
     plug2 respondTo:#get  with:[local2].
     plug2 respondTo:#set: with:[:arg | local2 := arg].
 
-    Transcript show:'plug1''s value: '; showCr:plug1 get.
-    Transcript show:'plug2''s value: '; showCr:plug2 get.
+    Transcript show:'plug1''s value: '; showCR:plug1 get.
+    Transcript show:'plug2''s value: '; showCR:plug2 get.
 
     plug1 set:5.
     plug2 set:17.
 
-    Transcript show:'plug1''s value: '; showCr:plug1 get.
-    Transcript show:'plug2''s value: '; showCr:plug2 get.
+    Transcript show:'plug1''s value: '; showCR:plug1 get.
+    Transcript show:'plug2''s value: '; showCR:plug2 get.
                                                                         [exEnd]
 "
 ! !
@@ -145,8 +145,8 @@
      |p|
 
      p := Plug new.
-     p respondTo:#foo  with:[Transcript showCr:'foo'].
-     p respondTo:#foo: with:[:arg | Transcript show:'foo:'; showCr:arg].
+     p respondTo:#foo  with:[Transcript showCR:'foo'].
+     p respondTo:#foo: with:[:arg | Transcript show:'foo:'; showCR:arg].
 
      p foo.
      p foo:'hello'.
@@ -173,8 +173,8 @@
      |p|
 
      p := Plug new.
-     p respondTo:#foo  with:[Transcript showCr:'foo'].
-     p respondTo:#foo: with:[:arg | Transcript show:'foo:'; showCr:arg].
+     p respondTo:#foo  with:[Transcript showCR:'foo'].
+     p respondTo:#foo: with:[:arg | Transcript show:'foo:'; showCR:arg].
 
      p foo.
      p foo:'hello'
@@ -197,5 +197,5 @@
 !Plug class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Plug.st,v 1.12 1996-04-27 17:59:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Plug.st,v 1.13 1996-05-18 15:37:08 cg Exp $'
 ! !
--- a/PlugAdptr.st	Sat May 18 15:56:05 1996 +0200
+++ b/PlugAdptr.st	Sat May 18 17:37:16 1996 +0200
@@ -63,8 +63,8 @@
 
         m := (PluggableAdaptor new)
                 getBlock:[:m | x]
-                putBlock:[:m :newValue | x := newValue. Transcript showCr:x]
-                updateBlock:[:m :aspect :param | Transcript showCr:'changed'].
+                putBlock:[:m :newValue | x := newValue. Transcript showCR:x]
+                updateBlock:[:m :aspect :param | Transcript showCR:'changed'].
         t := Toggle new.
         t model:m.
         t label:'toggle me'.
@@ -129,10 +129,10 @@
         dialog open.
 
         dialog accept value ifTrue:[
-            Transcript showCr:'accepted.'.
+            Transcript showCR:'accepted.'.
         ].
-        Transcript showCr:'  Name: ' , model name.
-        Transcript showCr:'  ID  : ' , model passportId printString.
+        Transcript showCR:'  Name: ' , model name.
+        Transcript showCR:'  ID  : ' , model passportId printString.
                                                                         [exEnd]
 
 
@@ -310,5 +310,5 @@
 !PluggableAdaptor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/PlugAdptr.st,v 1.11 1996-04-27 17:59:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/PlugAdptr.st,v 1.12 1996-05-18 15:37:11 cg Exp $'
 ! !
--- a/PluggableAdaptor.st	Sat May 18 15:56:05 1996 +0200
+++ b/PluggableAdaptor.st	Sat May 18 17:37:16 1996 +0200
@@ -63,8 +63,8 @@
 
         m := (PluggableAdaptor new)
                 getBlock:[:m | x]
-                putBlock:[:m :newValue | x := newValue. Transcript showCr:x]
-                updateBlock:[:m :aspect :param | Transcript showCr:'changed'].
+                putBlock:[:m :newValue | x := newValue. Transcript showCR:x]
+                updateBlock:[:m :aspect :param | Transcript showCR:'changed'].
         t := Toggle new.
         t model:m.
         t label:'toggle me'.
@@ -129,10 +129,10 @@
         dialog open.
 
         dialog accept value ifTrue:[
-            Transcript showCr:'accepted.'.
+            Transcript showCR:'accepted.'.
         ].
-        Transcript showCr:'  Name: ' , model name.
-        Transcript showCr:'  ID  : ' , model passportId printString.
+        Transcript showCR:'  Name: ' , model name.
+        Transcript showCR:'  ID  : ' , model passportId printString.
                                                                         [exEnd]
 
 
@@ -310,5 +310,5 @@
 !PluggableAdaptor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/PluggableAdaptor.st,v 1.11 1996-04-27 17:59:14 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/PluggableAdaptor.st,v 1.12 1996-05-18 15:37:11 cg Exp $'
 ! !
--- a/PrintConv.st	Sat May 18 15:56:05 1996 +0200
+++ b/PrintConv.st	Sat May 18 17:37:16 1996 +0200
@@ -106,7 +106,7 @@
       dialog addOkButton.
       dialog open.
       dialog accepted ifTrue:[
-          Transcript showCr:field editValue
+          Transcript showCR:field editValue
       ]
                                                                         [exEnd]
 
@@ -415,5 +415,5 @@
 !PrintConverter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/PrintConv.st,v 1.13 1996-04-27 17:56:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/PrintConv.st,v 1.14 1996-05-18 15:37:13 cg Exp $'
 ! !
--- a/PrintConverter.st	Sat May 18 15:56:05 1996 +0200
+++ b/PrintConverter.st	Sat May 18 17:37:16 1996 +0200
@@ -106,7 +106,7 @@
       dialog addOkButton.
       dialog open.
       dialog accepted ifTrue:[
-          Transcript showCr:field editValue
+          Transcript showCR:field editValue
       ]
                                                                         [exEnd]
 
@@ -415,5 +415,5 @@
 !PrintConverter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/PrintConverter.st,v 1.13 1996-04-27 17:56:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/PrintConverter.st,v 1.14 1996-05-18 15:37:13 cg Exp $'
 ! !
--- a/TriggerVal.st	Sat May 18 15:56:05 1996 +0200
+++ b/TriggerVal.st	Sat May 18 17:37:16 1996 +0200
@@ -77,7 +77,7 @@
         dialog okAction:[trigger value:true].
         dialog open.
 
-        Transcript show:firstName value; show:' '; showCr:lastName value
+        Transcript show:firstName value; show:' '; showCR:lastName value
                                                                         [exEnd]
 "
 ! !
@@ -95,5 +95,5 @@
 !TriggerValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/TriggerVal.st,v 1.8 1996-04-27 17:59:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/TriggerVal.st,v 1.9 1996-05-18 15:37:15 cg Exp $'
 ! !
--- a/TriggerValue.st	Sat May 18 15:56:05 1996 +0200
+++ b/TriggerValue.st	Sat May 18 17:37:16 1996 +0200
@@ -77,7 +77,7 @@
         dialog okAction:[trigger value:true].
         dialog open.
 
-        Transcript show:firstName value; show:' '; showCr:lastName value
+        Transcript show:firstName value; show:' '; showCR:lastName value
                                                                         [exEnd]
 "
 ! !
@@ -95,5 +95,5 @@
 !TriggerValue class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/TriggerValue.st,v 1.8 1996-04-27 17:59:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/TriggerValue.st,v 1.9 1996-05-18 15:37:15 cg Exp $'
 ! !
--- a/ValHolder.st	Sat May 18 15:56:05 1996 +0200
+++ b/ValHolder.st	Sat May 18 17:37:16 1996 +0200
@@ -73,7 +73,7 @@
 
         dialog open.
         dialog accepted ifTrue:[
-            Transcript show:firstName value; show:' '; showCr:lastName value
+            Transcript show:firstName value; show:' '; showCR:lastName value
         ]
                                                                         [exEnd]
 "
@@ -135,5 +135,5 @@
 !ValueHolder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/ValHolder.st,v 1.14 1996-04-27 17:59:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/ValHolder.st,v 1.15 1996-05-18 15:37:16 cg Exp $'
 ! !
--- a/ValueHolder.st	Sat May 18 15:56:05 1996 +0200
+++ b/ValueHolder.st	Sat May 18 17:37:16 1996 +0200
@@ -73,7 +73,7 @@
 
         dialog open.
         dialog accepted ifTrue:[
-            Transcript show:firstName value; show:' '; showCr:lastName value
+            Transcript show:firstName value; show:' '; showCR:lastName value
         ]
                                                                         [exEnd]
 "
@@ -135,5 +135,5 @@
 !ValueHolder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ValueHolder.st,v 1.14 1996-04-27 17:59:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ValueHolder.st,v 1.15 1996-05-18 15:37:16 cg Exp $'
 ! !
hg/stx-libview2