%#
%# COPYRIGHT:
%#
-%# This software is Copyright (c) 1996-2007 Best Practical Solutions, LLC
+%# This software is Copyright (c) 1996-2009 Best Practical Solutions, LLC
%# <jesse@bestpractical.com>
%#
%# (Except where explicitly superseded by other copyright notices)
%# along with this program; if not, write to the Free Software
%# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
%# 02110-1301 or visit their web page on the internet at
-%# http://www.gnu.org/copyleft/gpl.html.
+%# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html.
%#
%#
%# CONTRIBUTION SUBMISSION POLICY:
( !$type )
? Encode::is_utf8($_)
? $_
- : Encode::decode( utf8 => $_, Encode::FB_PERLQQ )
+ : Encode::decode( 'UTF-8' => $_, Encode::FB_PERLQQ )
: ( $type eq 'ARRAY' )
? [
map {
( ref($_) or Encode::is_utf8($_) )
? $_
- : Encode::decode( utf8 => $_, Encode::FB_PERLQQ )
+ : Encode::decode( 'UTF-8' => $_, Encode::FB_PERLQQ )
} @$_
]
: ( $type eq 'HASH' )
map {
( ref($_) or Encode::is_utf8($_) )
? $_
- : Encode::decode( utf8 => $_, Encode::FB_PERLQQ )
+ : Encode::decode( 'UTF-8' => $_, Encode::FB_PERLQQ )
} %$_
}
: $_
}
# otherwise, drop the user at the SelfService default page
- elsif ( $m->base_comp->path !~ '^(/+)SelfService/' ) {
+ elsif ( $m->base_comp->path !~ $RT::SelfServiceRegex ) {
RT::Interface::Web::Redirect($RT::WebURL."SelfService/");
}
else {