From 3b97f0c9eff9eee0a002e318acbfba25ee2ed4d7 Mon Sep 17 00:00:00 2001 From: bp-sawyers Date: Fri, 20 Apr 2012 13:37:58 +0000 Subject: [PATCH] Fix getxcatdocs to not use File::Path::make_path, which apparently isn't in all perls git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@12290 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- xCAT-client/bin/getxcatdocs | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/xCAT-client/bin/getxcatdocs b/xCAT-client/bin/getxcatdocs index c1ca33057..3a09e0081 100755 --- a/xCAT-client/bin/getxcatdocs +++ b/xCAT-client/bin/getxcatdocs @@ -17,7 +17,7 @@ use strict; #use lib "$::XCATROOT/lib/perl"; #use xCAT::Utils; use Getopt::Long; -use File::Path; +#use File::Path; use Cwd; #use Data::Dumper; @@ -92,7 +92,8 @@ sub verbose { if ($VERBOSE) { print shift, "\n"; } } sub gethtmldocs { my $dir = shift; my $savedir = getcwd(); - File::Path::make_path($dir); + #File::Path::make_path($dir); + mkdir($dir); chdir($dir); #system('pwd'); unlink <*>; # delete all the files in the dir, in case they previously ran this @@ -123,7 +124,8 @@ sub gethtmldocs { sub convert2pdf { my ($dir, $files) = @_; my $savedir = getcwd(); - File::Path::make_path($dir); + #File::Path::make_path($dir); + mkdir($dir); chdir($dir); if (system('which xhtml2pdf >/dev/null 2>&1')) { die "xhtml2pdf is not installed. See http://sourceforge.net/apps/mediawiki/xcat/index.php?title=Editing_xCAT_Documentation_Pages#Converting_Wiki_Pages_to_HTML_and_PDFs .\n"; } unlink <*>; # delete all the files in the dir, in case they previously ran this