Updating test

svn: r12173
2008-10-29 22:42:58 +00:00 · 2008-10-29 22:42:58 +00:00 · ba562277ed
commit ba562277ed
parent 6ff90087ac
1 changed files with 2 additions and 3 deletions
--- a/collects/tests/web-server/dispatchers/dispatch-passwords-test.ss
+++ b/collects/tests/web-server/dispatchers/dispatch-passwords-test.ss
@ -20,9 +20,8 @@
 (define (write-test-passwords!)
  (with-output-to-file test-passwords
    (lambda ()
-      (with-input-from-file default-passwords
-        (lambda ()
-          (write (read)))))
+      (write ''(("secret stuff" "/secret(/.*)?" (bubba "bbq") (|Billy| "BoB")
+                                (aladdin "open sesame")))))
    #:exists 'truncate/replace))

 (write-test-passwords!)