Cause error* to actually raise the error

svn: r5051

original commit: 6335ee3c03b229f3902c2012bb4c0a4bd6815879

collects/net/cookie-unit.ss

@@ -64,9 +64,10 @@
   ;; constructs a cookie-error struct from the given error message
   ;; (added to fix exceptions-must-take-immutable-strings bug)
   (define (error* fmt . args)
-    (make-cookie-error
-     (string->immutable-string (apply format fmt args))
-     (current-continuation-marks)))
+    (raise
+     (make-cookie-error
+       (string->immutable-string (apply format fmt args))
+       (current-continuation-marks))))
 
   ;; The syntax for the Set-Cookie response header is
   ;; set-cookie      =       "Set-Cookie:" cookies