George S. Baugh 3 年之前
父節點
當前提交
32b490f02c
共有 1 個文件被更改,包括 1 次插入0 次删除
  1. 1 0
      lib/TCMS.pm

+ 1 - 0
lib/TCMS.pm

@@ -148,6 +148,7 @@ sub app {
     }
 
     #Set various things we don't want overridden
+    $query->{acls} = [$query->{acls}] if (ref $query->{acls} ne 'ARRAY');
     $query->{acls} = Trog::Auth::acls4user($active_user) // [] if $active_user;
 
     $query->{user}         = $active_user;