--- a/UserPreferences.st	Wed May 11 01:31:00 2016 +0200
+++ b/UserPreferences.st	Wed May 11 13:33:18 2016 +0200
@@ -5161,6 +5161,34 @@
     "
 !
 
+sendMessagesOnlyToTranscript
+    "return the flag which controls if info/error messages are to be shown
+     on Stderr (if true is returned, they are only shown on the Transcript)"
+
+    ^ self at:#sendMessagesOnlyToTranscript ifAbsent:false
+
+    "
+     UserPreferences current sendMessagesOnlyToTranscript
+    "
+!
+
+sendMessagesOnlyToTranscript:aBoolean
+    "set the flag which controls if info/error messages are to be shown
+     on Stderr (if true is returned, they are only shown on the Transcript)"
+
+    self at:#sendMessagesOnlyToTranscript put:aBoolean
+
+    "
+     UserPreferences current sendMessagesOnlyToTranscript:true.
+     'hello' errorPrintCR.
+
+     UserPreferences current sendMessagesOnlyToTranscript:false.
+     'hello' errorPrintCR.
+
+     UserPreferences current sendMessagesOnlyToTranscript
+    "
+!
+
 showClockInLauncher
     "return the flag which controls if a clock is shown in the launcher"