From 4df9f6e28c5fee1db2b8dad75e74d2928a98150c Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Wed, 17 Jul 2013 10:35:43 -0400 Subject: Tweak error message about naughty GET handlers --- src/effectize.sml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/effectize.sml') diff --git a/src/effectize.sml b/src/effectize.sml index 332e1372..31cbe9ba 100644 --- a/src/effectize.sml +++ b/src/effectize.sml @@ -160,8 +160,8 @@ fun effectize file = if Settings.isSafeGet s then () else - ErrorMsg.errorAt loc ("A link (" ^ s - ^ ") could cause side effects; try implementing it with a form instead"); + ErrorMsg.errorAt loc ("A handler (" ^ s + ^ ") accessible via GET could cause side effects; try accessing it only via forms or removing it from the signature of its containing module"); ((DExport (Link, n, IM.inDomain (pushers, n)), #2 d), evs)) | DExport (Action _, n, _) => ((DExport (Action (if IM.inDomain (writers, n) then -- cgit v1.2.3