Removed dependency on Perl Encode::encode_utf8.

This commit is contained in:
bubnikv 2017-12-21 20:11:19 +01:00
parent e71b021b6e
commit 48ba7e5f73
2 changed files with 8 additions and 1 deletions

View File

@ -1470,7 +1470,7 @@ sub send_gcode {
Slic3r::encode_path($self->{send_gcode_file}),
# Remove the UTF-8 flag from the perl string, so the LWP::UserAgent can insert
# the UTF-8 encoded string into the request as a byte stream.
Encode::encode_utf8(Slic3r::path_to_filename($self->{send_gcode_file}))
Slic3r::path_to_filename_raw($self->{send_gcode_file})
],
print => $self->{send_gcode_file_print} ? 1 : 0,
],

View File

@ -119,6 +119,13 @@ path_to_filename(src)
RETVAL = Slic3r::PerlUtils::path_to_filename(src);
OUTPUT: RETVAL
local_encoded_string
path_to_filename_raw(src)
const char *src;
CODE:
RETVAL = Slic3r::PerlUtils::path_to_filename(src);
OUTPUT: RETVAL
std::string
path_to_stem(src)
const char *src;