oups, still errors...
YourErrorHandler>>open: anException
|mailText sender target|
sender := '
seaside@...'.
target := #('
admin@...').
mailText :=
'From: ', sender ,'
To: ', target first , '
Subject: error in your seaside app
'.
(SeasidePlatformSupport walkbackStringsFor: anException)
do: [ :each | mailText := (mailText , each) ]
separatedBy: [ String cr].
SeasidePlatformSupport deliverMailFrom: sender to: target
text: mailText .
WARenderLoop new session redirectWithMessage: 'error' delay: 2.
I cannot display the carriage return properly, but otherwise, it seems ok
Cédrick
_______________________________________________
seaside mailing list
seaside@...
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside
