Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
openSUSE:Evergreen:11.2:Test
perl
perl-netcmdutf8.diff
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File perl-netcmdutf8.diff of Package perl
--- lib/Net/Cmd.pm.orig 2009-06-10 09:23:18.000000000 +0000 +++ lib/Net/Cmd.pm 2009-06-10 09:25:49.000000000 +0000 @@ -226,6 +226,10 @@ sub command { $str = $cmd->toascii($str) if $tr; $str .= "\015\012"; + # encode to individual utf8 bytes if + # $str is a string (in internal UTF-8) + utf8::encode($str) if is_utf8($str); + my $len = length $str; my $swlen; @@ -471,6 +475,10 @@ sub rawdatasend { return 0 unless defined(fileno($cmd)); + # encode to individual utf8 bytes if + # $line is a string (in internal UTF-8) + utf8::encode($line) if is_utf8($line); + return 1 unless length($line);
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor
