stas 2004/01/22 18:02:41
Modified: t/response/TestAPI server_util.pm
Log:
revert the change: s/$@/canonpath($@)/, which was wrong
Revision Changes Path
1.13 +1 -1 modperl-2.0/t/response/TestAPI/server_util.pm
Index: server_util.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/t/response/TestAPI/server_util.pm,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -u -r1.12 -r1.13
--- server_util.pm 23 Jan 2004 00:15:18 -0000 1.12
+++ server_util.pm 23 Jan 2004 02:02:41 -0000 1.13
@@ -91,7 +91,7 @@
eval { Apache::Server::server_root_relative($obj, 'conf') };
ok t_cmp(qr/server_root_relative.*no .* key/,
- canonpath($@),
+ $@,
"Apache::Server::server_root_relative(\$obj, 'conf')");
}
