From e060c99447a445bbf1c527b8c712e3bf809ee694 Mon Sep 17 00:00:00 2001 From: Eelco Dolstra Date: Tue, 1 May 2012 16:35:18 -0400 Subject: [PATCH] Use mkpath instead of make_path Perl <= 5.10 doesn't have make_path. See e.g. http://hydra.nixos.org/build/2493981. --- scripts/nix-channel.in | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scripts/nix-channel.in b/scripts/nix-channel.in index 524ffa656..8f0fbbaa5 100755 --- a/scripts/nix-channel.in +++ b/scripts/nix-channel.in @@ -2,7 +2,7 @@ use strict; use File::Basename; -use File::Path qw(make_path); +use File::Path qw(mkpath); use Nix::Config; my $manifestDir = $Nix::Config::manifestDir; @@ -21,7 +21,7 @@ my $nixDefExpr = "$home/.nix-defexpr"; # Figure out the name of the channels profile. my $userName = getpwuid($<) or die "cannot figure out user name"; my $profile = "$Nix::Config::stateDir/profiles/per-user/$userName/channels"; -make_path(dirname $profile, mode => 0755); +mkpath(dirname $profile, 0, 0755); my %channels;