my %functions = ( default => \&write_default,
                  warning => \&write_warning,
                  confirm => \&write_confirm,
                  commit  => \&write_commit  );