diff options
| author | Yorhel <git@yorhel.nl> | 2008-12-29 13:42:58 +0100 |
|---|---|---|
| committer | Yorhel <git@yorhel.nl> | 2008-12-29 13:42:58 +0100 |
| commit | 3c1b01ec2ba0328f74aa7269bae8015cf1faf531 (patch) | |
| tree | 32be3bc4696399abf14e09f1f8f78f38f92509dc /lib/VNDB/Handler/ULists.pm | |
| parent | 1ef9db32e893669cc5da7b69b371ef051008b989 (diff) | |
| parent | f000aaf69e345bae4fc5581e5028463c85cfdafb (diff) | |
Merge branch 'beta'2.1
Diffstat (limited to 'lib/VNDB/Handler/ULists.pm')
| -rw-r--r-- | lib/VNDB/Handler/ULists.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/VNDB/Handler/ULists.pm b/lib/VNDB/Handler/ULists.pm index 5353dbc9..f86cba83 100644 --- a/lib/VNDB/Handler/ULists.pm +++ b/lib/VNDB/Handler/ULists.pm @@ -70,7 +70,8 @@ sub rlist { $f->{e} =~ /^([rv])(\d+)$/ && $1 eq 'r' ? (rstat => $2) : (vstat => $2) ) if $f->{e} ne 'del'; - $self->resRedirect('/r'.$id, 'temp'); + (my $ref = $self->reqHeader('Referer')||"/r$id") =~ s/^\Q$self->{url}//; + $self->resRedirect($ref, 'temp'); } |