diff --git a/perl-xCAT/xCAT/FSPvm.pm b/perl-xCAT/xCAT/FSPvm.pm index 410493e17..6271f4aa6 100644 --- a/perl-xCAT/xCAT/FSPvm.pm +++ b/perl-xCAT/xCAT/FSPvm.pm @@ -1682,7 +1682,7 @@ sub xCATdB { $profile, $parent ); - return( xCAT::PPCdb::add_ppc( $hwtype, [$values] )); + return( xCAT::PPCdb::add_ppc( $hwtype, [$values],'','',"FSP" )); } return undef; } diff --git a/perl-xCAT/xCAT/PPCscan.pm b/perl-xCAT/xCAT/PPCscan.pm index 413e93f05..4156ce135 100644 --- a/perl-xCAT/xCAT/PPCscan.pm +++ b/perl-xCAT/xCAT/PPCscan.pm @@ -411,7 +411,7 @@ sub format_output { # Strip errors for results ####################################### my @val = grep( !/^#.*: ERROR /, @$values ); - xCAT::PPCdb::add_ppc( $hwtype, \@val ); + xCAT::PPCdb::add_ppc( $hwtype, \@val,'','',"PPC" ); } ########################################### diff --git a/perl-xCAT/xCAT/PPCvm.pm b/perl-xCAT/xCAT/PPCvm.pm index cf81988ce..d753a5efb 100644 --- a/perl-xCAT/xCAT/PPCvm.pm +++ b/perl-xCAT/xCAT/PPCvm.pm @@ -1913,7 +1913,7 @@ sub xCATdB { $profile, $parent ); - return( xCAT::PPCdb::add_ppc( $hwtype, [$values] )); + return( xCAT::PPCdb::add_ppc( $hwtype, [$values],'','',"PPC" )); } return undef; }