anchor.diff:  
   (deftest do-access-grouplist/shows-grouplist ()
     (with-full-mock-players (alice)
  +    (setf (tempus::level-of alice) 51)
  +    (setf (override-security-p alice) t)
       (let ((group nil))
         (unwind-protect
              (progn
  
positive.code: 
  (deftest do-access-admin/cant-admin-group/emits-error ()
    (with-full-mock-players (alice)
      (let ((group (gethash "CoderAdmin" tempus::*access-groups-name*)))
        (unwind-protect
             (progn
  
negative.code: 
  (deftest do-access-describe/sets-description ()
    (with-mock-players (alice)
      (setf (tempus::level-of alice) 51)
      (setf (override-security-p alice) t)
      (let ((group nil))
        (unwind-protect
             (progn
  