__PACKAGE__->_encode_check(Encode::FB_CROAK | Encode::LEAVE_SRC);
# Remember to update this in Catalyst::Runtime as well!
-our $VERSION = '5.90095';
+our $VERSION = '5.90096';
$VERSION = eval $VERSION if $VERSION =~ /_/; # numify for warning-free dev releases
sub import {
$args =~ s/([^$URI::uric])/$URI::Escape::escapes{$1}/go;
# re-attach fragment on the end of everything after adding params
- $args .= "#$fragment" if $fragment;
+ $query .= "#$fragment" if $fragment;
my $res = bless(\"${base}${args}${query}", $class);
$res;