From 08e2e0925a378a472e02210af0fb9ba21c85f8e6 Mon Sep 17 00:00:00 2001
From: bp-sawyers <bp-sawyers@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 27 Jun 2011 21:52:21 +0000
Subject: [PATCH] Fix bug 3323351, do not generate route and group man pages on
 aix

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@9962 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/db2man | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/perl-xCAT/db2man b/perl-xCAT/db2man
index 1c665e1ec..e1d9049bd 100755
--- a/perl-xCAT/db2man
+++ b/perl-xCAT/db2man
@@ -20,6 +20,8 @@ my $poddir = 'pods';
 my $mandir = 'share/man';
 my $htmldir = 'share/doc';
 my $cachedir = '/tmp';
+my $isaix = ($^O =~ /^aix/i);
+my $skiponaix = 'route|group';
 
 my $poddir5 = 'pods/man5';
 my $poddir7 = 'pods/man7';
@@ -30,7 +32,7 @@ if (system("mkdir -p $poddir7")) { die "Error: could not create $poddir7.\n"; }
 print "Building PODs pages for the database tables...\n";
 writesummarypage("$poddir5/xcatdb.5.pod", xCAT::Table->getDescriptions(), \%{xCAT::Schema::defspec});
 
-# Build the pad man page for each object definition
+# Build the pod man page for each object definition
 my $defspecref = \%{xCAT::Schema::defspec};
 foreach my $defkey (keys %$defspecref) {
 	my $def = $defspecref->{$defkey};
@@ -55,6 +57,7 @@ my @pods = getPodList($poddir);
 #mkdir($mandir) or die "Error: could not create $mandir.\n";
 print "Converting PODs to man pages...\n";
 foreach my $podfile (@pods) {
+	if ($isaix && grep(/\/($skiponaix)\.\d\.pod$/, $podfile)) { print "Skipping $podfile\n"; next; }
     my $manfile = $podfile;
     $manfile =~ s/^$poddir/$mandir/;      # change the beginning of the path
     $manfile =~ s/\.pod$//;			# change the ending