diff -r eae2df0a3ad2 -r 3c0246b4e602 UserNotification.st --- a/UserNotification.st Thu Feb 13 18:23:10 2003 +0100 +++ b/UserNotification.st Mon Feb 17 20:09:07 2003 +0100 @@ -90,20 +90,26 @@ text := self description. - (Smalltalk isInitialized and:[Dialog notNil]) ifTrue:[ - Dialog notify:text. + (Smalltalk isInitialized + and:[Dialog notNil + and:[Screen notNil + and:[Screen current notNil + and:[Screen current isOpen + ]]]]) ifTrue:[ + Dialog autoload. "in case its autoloaded" + Dialog information:text. ] ifFalse:[ " on systems without GUI, simply show the message on the Transcript. " - Transcript showCR:text. + Transcript show:'notification: '; showCR:text. ]. self proceed. " - UserNotification raiseRequestWith:self errorString:' abc' + UserNotification raiseRequestErrorString:' abc' " "Modified: / 3.8.1999 / 14:06:55 / stefan" @@ -112,6 +118,7 @@ !UserNotification class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic/UserNotification.st,v 1.4 2001-11-17 10:00:56 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/UserNotification.st,v 1.5 2003-02-17 19:09:07 stefan Exp $' ! ! + UserNotification initialize!