Removed dependency on Perl Encode::encode_utf8.
This commit is contained in:
parent
e71b021b6e
commit
48ba7e5f73
2 changed files with 8 additions and 1 deletions
|
@ -1470,7 +1470,7 @@ sub send_gcode {
|
||||||
Slic3r::encode_path($self->{send_gcode_file}),
|
Slic3r::encode_path($self->{send_gcode_file}),
|
||||||
# Remove the UTF-8 flag from the perl string, so the LWP::UserAgent can insert
|
# 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.
|
# 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,
|
print => $self->{send_gcode_file_print} ? 1 : 0,
|
||||||
],
|
],
|
||||||
|
|
|
@ -119,6 +119,13 @@ path_to_filename(src)
|
||||||
RETVAL = Slic3r::PerlUtils::path_to_filename(src);
|
RETVAL = Slic3r::PerlUtils::path_to_filename(src);
|
||||||
OUTPUT: RETVAL
|
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
|
std::string
|
||||||
path_to_stem(src)
|
path_to_stem(src)
|
||||||
const char *src;
|
const char *src;
|
||||||
|
|
Loading…
Reference in a new issue