[Rt-commit] r14341 - in rt/3.8/trunk: .

[spang at bestpractical.com]

Author: spang
Date: Mon Jul 21 18:02:37 2008
New Revision: 14341

Modified:
   rt/3.8/trunk/   (props changed)
   rt/3.8/trunk/lib/RT/Test.pm

Log:
 r43749 at loki:  spang | 2008-07-08 16:33:09 +0100
 remove unused code


Modified: rt/3.8/trunk/lib/RT/Test.pm
==============================================================================
--- rt/3.8/trunk/lib/RT/Test.pm	(original)
+++ rt/3.8/trunk/lib/RT/Test.pm	Mon Jul 21 18:02:37 2008
@@ -654,14 +654,11 @@
     $key .= ".$type.key";
 
     require RT::Crypt::GnuPG;
-    (my $volume, my $directories, my $file) = File::Spec->splitpath($0);
-    my $keys_dir = File::Spec->catdir( File::Spec->curdir(), $directories,
-        File::Spec->updir(), qw(data gnupg keys) );
     # this is a bit hackish; calling it from somewhere that's not a subdir
     # of t/ will fail
     return RT::Crypt::GnuPG::ImportKey(
-        RT::Test->file_content([get_relocatable_dir(File::Spec->updir(), 'data',
-        'gnupg', 'keys'), $key])
+        RT::Test->file_content([get_relocatable_dir(File::Spec->updir(),
+                qw(data gnupg keys)), $key])
     );
 }