rt/t/api/rt.t

   1
   2 use strict;
   3 use warnings;
   4 use RT;
   5 use RT::Test tests => 4;
   6
   7
   8 {
   9
  10 is ($RT::Nobody->Name() , 'Nobody', "Nobody is nobody");
  11 isnt ($RT::Nobody->Name() , 'root', "Nobody isn't named root");
  12 is ($RT::SystemUser->Name() , 'RT_System', "The system user is RT_System");
  13 isnt ($RT::SystemUser->Name() , 'noname', "The system user isn't noname");
  14
  15
  16 }
  17
  18 1;