dump Transcript output to stdout

dalehenrich · Jun 18, 2012 · cc6092c · cc6092c
1 parent f0faecd
commit cc6092c
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/tests/travisCI.st b/tests/travisCI.st
@@ -1,5 +1,13 @@
 "Load the Sample tests ... travis has already done a `git clone`"
 | gitPath |
+true 
+  ifTrue: [ "Tie Transcript to stdout"
+    FileDirectory default 
+      fileNamed: 'FileStream-show.st'
+      do: [:fileStream | fileStream fileIn ].
+    (Smalltalk associationAt: #Transcript) value: FileStream stdout ].
+Transcript cr; show: 'Loading Sample....'.
+
 gitPath := (FileDirectory default directoryNamed: 'git_cache') fullName.
 Metacello new
   baseline: 'Sample';