[Rt-commit] r13779 - in rt/3.8/trunk: t/web

[spang at bestpractical.com]

Author: spang
Date: Thu Jul  3 15:35:33 2008
New Revision: 13779

Modified:
   rt/3.8/trunk/   (props changed)
   rt/3.8/trunk/t/web/command_line.t

Log:
 r43579 at loki:  spang | 2008-07-03 15:51:36 +0100
 make command_line.t use RT::Test::get_relocateable_file()


Modified: rt/3.8/trunk/t/web/command_line.t
==============================================================================
--- rt/3.8/trunk/t/web/command_line.t	(original)
+++ rt/3.8/trunk/t/web/command_line.t	Thu Jul  3 15:35:33 2008
@@ -109,12 +109,8 @@
     expect_like(qr/Message recorded/, "Added the correspondence");
     ### should test to make sure it actually got added
 
-    # figure out the path to the test data
-    (my $volume, my $directories, my $file) = File::Spec->splitpath($0);
-    my $datadir = File::Spec->catdir(File::Spec->curdir(), $directories,
-        File::Spec->updir(), "data");
-    my $test_email = File::Spec->catfile(
-        File::Spec->catdir($datadir, "emails"), "lorem-ipsum");
+    my $test_email = RT::Test::get_relocateable_file('lorem-ipsum', qw(data emails));
+    warn("test email path: $test_email");
 
     # add attachments to a ticket
     # text attachment