release/src/router/mysql/mysql-test/include/not_crashrep.inc

   1 # Check if CrashReporter is enabled and would open a window
   2
   3 perl;
   4 sub skip_test {
   5   # Only relevant on Mac OS X
   6   return 0 unless $^O eq 'darwin';
   7   my $crep= `defaults read com.apple.CrashReporter DialogType`;
   8   return 0 if $?;
   9   chomp ($crep);
  10   $crep= lc $crep;
  11   return ($crep eq 'basic' || $crep eq 'developer');
  12 }
  13 my $skip= skip_test();
  14 open (F, ">" . $ENV{'MYSQL_TMP_DIR'} . "/crashrep.inc");
  15 print F "let \$crashrep= $skip;\n";
  16 close F;
  17 EOF
  18
  19 --source $MYSQL_TMP_DIR/crashrep.inc
  20 --remove_file $MYSQL_TMP_DIR/crashrep.inc
  21
  22 if ($crashrep) {
  23   --skip CrashReporter would popup a window
  24 }