From a953425af44bc67b53e11d50b15c116a63314a34 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Fri, 16 Aug 2013 16:04:54 -0500 Subject: [PATCH] adjust htdp tests for the change to require in 736c8ca12b --- pkgs/htdp-pkgs/htdp-test/tests/htdp-lang/beg-adv.rktl | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/pkgs/htdp-pkgs/htdp-test/tests/htdp-lang/beg-adv.rktl b/pkgs/htdp-pkgs/htdp-test/tests/htdp-lang/beg-adv.rktl index 1e50b78f51..6f7f1fff52 100644 --- a/pkgs/htdp-pkgs/htdp-test/tests/htdp-lang/beg-adv.rktl +++ b/pkgs/htdp-pkgs/htdp-test/tests/htdp-lang/beg-adv.rktl @@ -249,8 +249,7 @@ (htdp-syntax-test #'(require "/a") #rx"start with a slash") (htdp-syntax-test #'(require "a/") #rx"end with a slash") (htdp-syntax-test #'(require "a%&#^%") #rx"string can contain only") -(htdp-syntax-test #'(require (lib)) #rx"expected at least two strings") -(htdp-syntax-test #'(require (lib "a")) #rx"expected at least two strings") +(htdp-syntax-test #'(require (lib)) #rx"expected at least one string") (htdp-syntax-test #'(require (lib "a" "b/")) #rx"end with a slash") (htdp-syntax-test #'(require (lib "a" 2)) #rx"string for a lib path") (htdp-syntax-test #'(require (planet "a" 2)) #rx"not a valid planet path")