diff --git a/perl-xCAT/xCAT/FSPvm.pm b/perl-xCAT/xCAT/FSPvm.pm index 0f5e9cf55..0f6b5d792 100644 --- a/perl-xCAT/xCAT/FSPvm.pm +++ b/perl-xCAT/xCAT/FSPvm.pm @@ -580,7 +580,7 @@ sub lsvm_parse_args { sub modify { my $request = shift; my $hash = shift; - return modify_by_prof( $request, $hash) if ( $request->{opt}->{p}); + return modify_by_prof( $request, $hash) if ( $request->{opt}->{p} || $request->{stdin}); return create( $request, $hash) if ( $request->{opt}->{i}); return ([["Error", "Miss argument"]]); }