Changeset 3617
- Timestamp:
- 04/10/09 09:13:44 (12 months ago)
- Location:
- branches/feature-utf8-strings/lib
- Files:
-
- 4 modified
-
MT.pm (modified) (3 diffs)
-
MT/CMS/Common.pm (modified) (2 diffs)
-
MT/CMS/Entry.pm (modified) (2 diffs)
-
MT/CMS/Tools.pm (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
branches/feature-utf8-strings/lib/MT.pm
r3593 r3617 12 12 use File::Basename; 13 13 use MT::Util qw( weaken ); 14 use MT::I18N qw( encode_text );14 use MT::I18N; 15 15 16 16 our ( $VERSION, $SCHEMA_VERSION ); … … 1722 1722 . ( $res->{good} 1723 1723 ? '' 1724 : ' ' . MT::I18N::encode_text( $res->{error} ));1724 : ' ' . $res->{error} ); 1725 1725 } 1726 1726 $entry->pinged_urls( join "\n", @$pinged ); … … 2238 2238 my $q = $mt->{query}; 2239 2239 if ($mode) { 2240 my @query = map { { name => $_, value => scalar encode_text( $q->param($_)) }; }2240 my @query = map { { name => $_, value => $q->param($_) }; } 2241 2241 grep { ($_ ne 'username') && ($_ ne 'password') && ($_ ne 'submit') && ($mode eq 'logout' ? ($_ ne '__mode') : 1) } $q->param; 2242 2242 $param->{query_params} = \@query; -
branches/feature-utf8-strings/lib/MT/CMS/Common.pm
r3531 r3617 444 444 $app->remove_preview_file; 445 445 446 my $enc = $app->config->PublishCharset;447 446 if ( $q->param('_recover') ) { 448 447 my $sess_obj = $app->autosave_session_obj; … … 464 463 foreach (qw( title text )) { 465 464 my $data = $q->param($_); 466 my $encoded = MT::I18N::encode_text( $data, undef, $enc ) 467 if $data; 468 $q->param( $_, $encoded ); 465 $q->param( $_, $data ); 469 466 } 470 467 } -
branches/feature-utf8-strings/lib/MT/CMS/Entry.pm
r3531 r3617 4 4 use MT::Util qw( format_ts relative_date remove_html encode_html encode_js 5 5 encode_url archive_file_for offset_time_list ); 6 use MT::I18N qw( substr_text const length_text wrap_text encode_text6 use MT::I18N qw( substr_text const length_text wrap_text 7 7 break_up_text first_n_text guess_encoding ); 8 8 … … 1744 1744 "Ping '[_1]' failed: [_2]", 1745 1745 $res->{url}, 1746 encode_text( $res->{error}, undef, undef )1746 $res->{error} 1747 1747 ), 1748 1748 class => 'system', -
branches/feature-utf8-strings/lib/MT/CMS/Tools.pm
r3531 r3617 4 4 use Symbol; 5 5 6 use MT::I18N qw( encode_textwrap_text );6 use MT::I18N qw( wrap_text ); 7 7 use MT::Util qw( encode_url encode_html decode_html encode_js trim ); 8 8 … … 72 72 $syscheck_object = undef; 73 73 } 74 return encode_text( $syscheck_object->data(), 'utf-8', undef)74 return $syscheck_object->data() 75 75 if ($syscheck_object); 76 76 … … 99 99 ); 100 100 $syscheck_object->save(); 101 $result = encode_text( $result, 'utf-8', undef );102 101 } 103 102 return $result;
