Skip to content
This repository
Browse code

changing the command used by File::Path from make_path to the older (…

…and thus more compatible) mkpath.
  • Loading branch information...
commit 6d2cbb0c43693824ab77e3810abbd9b575ad200d 1 parent 06a0269
Scott Cain authored February 14, 2013 lstein committed March 08, 2013

Showing 1 changed file with 2 additions and 2 deletions. Show diff stats Hide diff stats

  1. 4  lib/Bio/Graphics/Browser2/Action.pm
4  lib/Bio/Graphics/Browser2/Action.pm
@@ -10,7 +10,7 @@ use Bio::Graphics::Browser2::TrackDumper;
10 10
 use Bio::Graphics::Browser2::Render::HTML;
11 11
 use Bio::Graphics::Browser2::SendMail;
12 12
 use File::Basename 'basename';
13  
-use File::Path     'make_path';
  13
+use File::Path     'mkpath';
14 14
 use JSON;
15 15
 use constant DEBUG => 0;
16 16
 use Data::Dumper;
@@ -510,7 +510,7 @@ sub ACTION_mail_snapshot {
510 510
 
511 511
      my $filename = $snapshots->{$name}{snapshot_id};
512 512
          
513  
-     make_path(File::Spec->catfile($dir,$source,$id));
  513
+     mkpath(File::Spec->catfile($dir,$source,$id));
514 514
 	
515 515
      #Storing the snapshot as a string and saving it to a textfile. Typical directory /var/lib/gbrowse2/userdata/{source}/{uploadid}: 
516 516
      my $snapshot = Dumper($snapshots->{$name}{data});

0 notes on commit 6d2cbb0

Please sign in to comment.
Something went wrong with that request. Please try again.