Fixed bug where the profile conf file is not updated on 1st edit. Fixed error messages in to use double quotes so that variables are interpreted.

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.8@16299 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
phamt 2013-05-15 14:10:28 +00:00
parent a6c2909603
commit 4b65890eca
2 changed files with 4 additions and 4 deletions

View File

@ -2365,6 +2365,7 @@ sub web_mkzprofile() {
my $size = $request->{arg}->[3];
# Create profile under /var/opt/xcat/profiles
`mkdir -p /var/opt/xcat/profiles`;
my $var = "";
`echo "# Configuration for virtual machines" > /var/opt/xcat/profiles/$profile.conf`;
$var = $profile . "_diskpool";
@ -2372,8 +2373,7 @@ sub web_mkzprofile() {
$var = $profile . "_eckd_size";
`echo "$var=$size" >> /var/opt/xcat/profiles/$profile.conf`;
# Move directory entry into /var/opt/xcat/profiles from /var/tmp
`mkdir -p /var/opt/xcat/profiles`;
# Move directory entry into /var/opt/xcat/profiles from /var/tmp
`mv /var/tmp/$profile.direct /var/opt/xcat/profiles`;
my $info = "Profile successfully created/updated";

View File

@ -636,13 +636,13 @@ sub clonezlinux {
# Exit if default.conf does not exist
if ( !(`test -e $default_conf && echo Exists`) ) {
println( $callback, '(Error) $default_conf does not exists' );
println( $callback, "(Error) $default_conf does not exists" );
return;
}
# Exit if default.direct does not exist
if ( !(`test -e $default_direct && echo Exists`) ) {
println( $callback, '(Error) $default_direct does not exists' );
println( $callback, "(Error) $default_direct does not exists" );
return;
}