else {
# save page
check_canedit($page, $q, $session);
- if (! -e "$config{srcdir}/$file" &&
- ! -e "$config{underlaydir}/$file" &&
- $form->field("do") ne "create") {
+
+ my $exists=-e "$config{srcdir}/$file";
+
+ if ($form->field("do") ne "create" &&
+ ! $exists && ! -e "$config{underlaydir}/$file") {
$form->tmpl_param("page_gone", 1);
$form->field(name => "do", value => "create", force => 1);
$form->tmpl_param("page_select", 0);
print misctemplate($form->title, $form->render(submit => \@buttons));
return;
}
- elsif (-e "$config{srcdir}/$file" &&
- $form->field("do") eq "create") {
+ elsif ($form->field("do") eq "create" && $exists) {
$form->tmpl_param("creation_conflict", 1);
$form->field(name => "do", value => "edit", force => 1);
$form->tmpl_param("page_select", 0);
$message=$form->field('comments');
}
- if (! -e "$config{srcdir}/$file") {
+ if (! $exists) {
rcs_add($file);
}
sub rcs_add ($) {
# Add a file. The filename is relative to the root of the srcdir.
+ # Note that this should not check the new file in, it should only
+ # prepare for it to be checked in when rcs_commit is called.
}
sub rcs_recentchanges ($) {