blob: f1c3b8982c2d9cc0a29e8d3a2f30c8c37c8a8452 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
--- a/10-syntax.t
+++ b/10-syntax.t
@@ -4,9 +4,9 @@
use Test::HTTP '-syntax', tests => 2;
test_http "Socialtext" {
- >> GET http://www.socialtext.com/
+ >> GET http://www.socialtext.net/
- << 200
+ << 301
}
# Method in a variable should be OK, too.
@@ -14,7 +14,7 @@
test_http "method in variable" {
my $method = 'GET';
- >> $method http://www.socialtext.com/
+ >> $method http://www.socialtext.net/
- << 200
+ << 301
}
|