Simplified the readline method in the compression I/O.
This commit is contained in:
parent
606ee6d852
commit
219945c6d4
12
arclog
12
arclog
@ -1692,9 +1692,7 @@ sub open_append : method {
|
||||
}
|
||||
|
||||
# Read a line from the I/O stream
|
||||
sub readline : method {
|
||||
return $_[0]->{"gz"}->getline();
|
||||
}
|
||||
sub readline : method { $_[0]->{"gz"}->getline; }
|
||||
|
||||
# Output data to the I/O stream
|
||||
sub write : method {
|
||||
@ -2149,9 +2147,7 @@ sub open_append : method {
|
||||
}
|
||||
|
||||
# Read a line from the I/O stream
|
||||
sub readline : method {
|
||||
return $_[0]->{"bz"}->getline();
|
||||
}
|
||||
sub readline : method { $_[0]->{"bz"}->getline; }
|
||||
|
||||
# Output data to the I/O stream
|
||||
sub write : method {
|
||||
@ -2607,9 +2603,7 @@ sub open_append : method {
|
||||
}
|
||||
|
||||
# Read a line from the I/O stream
|
||||
sub readline : method {
|
||||
return $_[0]->{"xz"}->getline();
|
||||
}
|
||||
sub readline : method { $_[0]->{"xz"}->getline; }
|
||||
|
||||
# Output data to the I/O stream
|
||||
sub write : method {
|
||||
|
Loading…
Reference in New Issue
Block a user