Commit bb293a44 authored by Leigh B. Stoller's avatar Leigh B. Stoller

Fix stupid cleanup error.

parent e81e7bd0
......@@ -139,9 +139,10 @@ proc tb-set-hardware {node type args} {
if {! ${GLOBALS::anonymous}} {
var_import ::TBCOMPAT::nodetypeXpid_permissions
var_import ::GLOBALS::pid
set allowed 0
set allowed 1
if {[info exists nodetypeXpid_permissions($type)]} {
set allowed 0
foreach allowedpid $nodetypeXpid_permissions($type) {
if {$allowedpid == $pid} {
set allowed 1
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment