[pve-devel] r5622 - in qemu-server/pve2: . PVE/API2

svn-commits at proxmox.com svn-commits at proxmox.com
Fri Feb 25 08:38:23 CET 2011


Author: dietmar
Date: 2011-02-25 08:38:23 +0100 (Fri, 25 Feb 2011)
New Revision: 5622

Modified:
   qemu-server/pve2/PVE/API2/Qemu.pm
   qemu-server/pve2/qm
Log:
s/root/root at pam/


Modified: qemu-server/pve2/PVE/API2/Qemu.pm
===================================================================
--- qemu-server/pve2/PVE/API2/Qemu.pm	2011-02-25 07:32:45 UTC (rev 5621)
+++ qemu-server/pve2/PVE/API2/Qemu.pm	2011-02-25 07:38:23 UTC (rev 5622)
@@ -254,7 +254,7 @@
 	my $vmid = extract_param($param, 'vmid');
 
 	my $skiplock = extract_param($param, 'skiplock');
-	raise_param_exc({ skiplock => "Only root may use this option." }) if $user ne 'root';
+	raise_param_exc({ skiplock => "Only root may use this option." }) if $user ne 'root at pam';
 
 	my $delete = extract_param($param, 'delete');
 	my $force = extract_param($param, 'force');
@@ -392,7 +392,7 @@
 
 	my $skiplock = $param->{skiplock};
 	raise_param_exc({ skiplock => "Only root may use this option." }) 
-	    if $user ne 'root';
+	    if $user ne 'root at pam';
 
 	my $storecfg = PVE::Storage::config(); 
 
@@ -597,7 +597,7 @@
 
 	my $skiplock = extract_param($param, 'skiplock');
 	raise_param_exc({ skiplock => "Only root may use this option." }) 
-	    if $user ne 'root';
+	    if $user ne 'root at pam';
 
 	my $command = $param->{command};
 

Modified: qemu-server/pve2/qm
===================================================================
--- qemu-server/pve2/qm	2011-02-25 07:32:45 UTC (rev 5621)
+++ qemu-server/pve2/qm	2011-02-25 07:38:23 UTC (rev 5622)
@@ -33,7 +33,7 @@
 
 $rpcenv->init_request();
 $rpcenv->set_language($ENV{LANG});
-$rpcenv->set_user('root'); 
+$rpcenv->set_user('root at pam'); 
 
 my $nodename = PVE::INotify::nodename();
 



More information about the pve-devel mailing list