--- a/Signal.st	Tue Mar 25 12:34:57 1997 +0100
+++ b/Signal.st	Tue Mar 25 12:42:00 1997 +0100
@@ -284,22 +284,30 @@
     errorString isNil ifTrue:[
         t := notifierString
     ] ifFalse:[
-        t := errorString
+        t := errorString.
+        (errorString endsWith:Character space) ifTrue:[
+            t := errorString , notifierString
+        ] ifFalse:[
+            (errorString startsWith:Character space) ifTrue:[
+                t := notifierString , errorString
+            ]
+        ].
     ].
-
-    aParameter isNil ifTrue:[
-        ^ t
-    ].
+    ^ t.
 
-    (t startsWith:' ') ifTrue:[
-        ^ aParameter printString , t
-    ].
-    (t endsWith:' ') ifTrue:[
-        ^ t , aParameter printString
-    ].
-    ^ t
+"/    aParameter isNil ifTrue:[
+"/        ^ t
+"/    ].
+"/
+"/    (t startsWith:' ') ifTrue:[
+"/        ^ aParameter printString , t
+"/    ].
+"/    (t endsWith:' ') ifTrue:[
+"/        ^ t , aParameter printString
+"/    ].
+"/    ^ t
 
-    "Modified: 9.5.1996 / 15:18:58 / cg"
+    "Modified: 25.3.1997 / 12:12:37 / cg"
 ! !
 
 !Signal methodsFor:'queries'!
@@ -693,6 +701,6 @@
 !Signal class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.40 1997-01-28 00:01:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Signal.st,v 1.41 1997-03-25 11:42:00 cg Exp $'
 ! !
 Signal initialize!