diff options
| author | ivan <ivan> | 2006-12-29 08:51:34 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2006-12-29 08:51:34 +0000 |
| commit | 633c48448d9468690b7ad77eb6ff7c660a286658 (patch) | |
| tree | 4e08051f8d805e7e95c8dffe5e3e73b0c360f965 /httemplate/edit/process/elements/process.html | |
| parent | 6cb5c702b17b98be46adea4539e15d5f312e5be1 (diff) | |
service refactor!
Diffstat (limited to 'httemplate/edit/process/elements/process.html')
| -rw-r--r-- | httemplate/edit/process/elements/process.html | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/httemplate/edit/process/elements/process.html b/httemplate/edit/process/elements/process.html index 96d568754..4b1d2c840 100644 --- a/httemplate/edit/process/elements/process.html +++ b/httemplate/edit/process/elements/process.html @@ -19,6 +19,8 @@ % # OR % # 'redirect' => 'view/table.cgi?', # value of primary key is appended % # +% # 'error_redirect' => popurl(2).'edit/table.cgi?', #query string appended +% # % # 'edit_ext' => 'html', #defaults to 'html', you might want 'cgi' while the % # #naming is still inconsistent % # @@ -78,7 +80,8 @@ % if ( $error ) { % $cgi->param('error', $error); % my $edit_ext = $opt{'edit_ext'} || 'html'; -% print $cgi->redirect(popurl(2). "$table.$edit_ext?". $cgi->query_string ); +% my $url = $opt{'error_redirect'} || popurl(2)."$table.$edit_ext?"; +% print $cgi->redirect($url. $cgi->query_string ); % } elsif ( $opt{'redirect'} ) { % print $cgi->redirect( $opt{'redirect'}. $pkeyvalue ); % } else { |