mysql/save_sync.cgi

   1 #!/usr/local/bin/perl
   2 # save_sync.cgi
   3 # Save unix-mysql synchronization options
   4
   5 require './mysql-lib.pl';
   6 &ReadParse();
   7
   8 $config{'sync_create'} = $in{'sync_create'};
   9 $config{'sync_modify'} = $in{'sync_modify'};
  10 $config{'sync_delete'} = $in{'sync_delete'};
  11 $config{'sync_privs'} = join(" ", split(/\0/, $in{'sync_privs'}));
  12 $config{'sync_host'} = $in{'host_def'} ? undef : $in{'host'};
  13 &write_file("$module_config_directory/config", \%config);
  14 &redirect("");
  15