--- rat/lonpageflip.pm 2003/09/17 18:16:39 1.45 +++ rat/lonpageflip.pm 2003/10/29 22:09:17 1.46 @@ -2,7 +2,7 @@ # # Page flip handler # -# $Id: lonpageflip.pm,v 1.45 2003/09/17 18:16:39 albertel Exp $ +# $Id: lonpageflip.pm,v 1.46 2003/10/29 22:09:17 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -190,6 +190,7 @@ sub handler { $ENV{'form.postdata'}=~/(\w+)\:(.*)/; my $direction=$1; my $currenturl=$2; + $currenturl=~s/\.\d+\.(\w+)$/\.$1/; if ($direction eq 'return') { # -------------------------------------------------------- Return to last known my $last;