summaryrefslogtreecommitdiff
path: root/httemplate/edit/process
diff options
context:
space:
mode:
Diffstat (limited to 'httemplate/edit/process')
-rw-r--r--httemplate/edit/process/generic.cgi5
-rw-r--r--httemplate/edit/process/router.cgi3
2 files changed, 5 insertions, 3 deletions
diff --git a/httemplate/edit/process/generic.cgi b/httemplate/edit/process/generic.cgi
index 751987f7a..9c54feb1d 100644
--- a/httemplate/edit/process/generic.cgi
+++ b/httemplate/edit/process/generic.cgi
@@ -27,6 +27,7 @@ use DBIx::DBSchema::Table;
my $error;
my $p2 = popurl(2);
+my $p3 = popurl(3);
my $table = $cgi->param('table');
my $dbdef = dbdef or die "Cannot fetch dbdef!";
@@ -56,7 +57,7 @@ if($pkey_val and (my $old = qsearchs($table, { $pkey, $pkey_val} ))) {
}
my $redirect_ok = (($cgi->param('redirect_ok')) ?
- $cgi->param('redirect_ok') : $p2."view/$table.cgi");
+ $cgi->param('redirect_ok') : $p3."browse/generic.cgi?$table");
my $redirect_error = (($cgi->param('redirect_error')) ?
$cgi->param('redirect_error') : $cgi->referer());
@@ -64,6 +65,6 @@ if($error) {
$cgi->param('error', $error);
print $cgi->redirect($redirect_error . '?' . $cgi->query_string);
} else {
- print $cgi->redirect($redirect_ok . '?' .$pkey_val);
+ print $cgi->redirect($redirect_ok);
}
%>
diff --git a/httemplate/edit/process/router.cgi b/httemplate/edit/process/router.cgi
index c0cb884f0..1b7fc3805 100644
--- a/httemplate/edit/process/router.cgi
+++ b/httemplate/edit/process/router.cgi
@@ -34,6 +34,7 @@ if($old) {
} #else do nothing
} else {
$error = $new->insert;
+ $routernum = $new->routernum;
}
check($error);
@@ -95,6 +96,6 @@ foreach($cgi->param) {
# Yay, everything worked!
$dbh->commit or die $dbh->errstr;
-print $cgi->redirect(popurl(3). "edit/router.cgi?$routernum");
+print $cgi->redirect(popurl(3). "browse/router.cgi");
%>