mirrors/mc
1
0
Fork 0
mirror of https://github.com/MidnightCommander/mc synced 2024-12-23 04:46:55 +03:00
Code Issues Packages Projects Releases Wiki Activity

* extfs/mailfs: Strip trailing DOS newlines from mail files.

Browse Source 
From Christian Gennerat <christian.gennerat@vz.cit.alcatel.fr>
This commit is contained in:
Pavel Roskin 2001-07-09 20:07:43 +00:00
parent 80f37db22b
commit e1d5a8250d
2 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
vfs/ChangeLog
View File

@ -1,5 +1,8 @@
2001-07-09 Pavel Roskin <proski@gnu.org>
* extfs/mailfs: Strip trailing DOS newlines from mail files.
From Christian Gennerat <christian.gennerat@vz.cit.alcatel.fr>
* fish.c (fish_chown): Do nothing and return success if
getpwuid() or getgrgid() fails.

3
vfs/extfs/mailfs
View File

@ -44,6 +44,7 @@ if (eval "require Date::Parse") { # fancy date parsing available?
sub process_header {
while (<IN>) {
s/\r$//;
last if /^$/;
die "unexpected EOF\n" if eof;
if (/^Date:\s(.*)$/) {
@ -72,6 +73,7 @@ sub mailfs_list {
while(1) {
$_=<IN>;
s/\r$//;
if (!defined($_)) { # EOF
print_dir_line;
exit 0;
@ -96,6 +98,7 @@ sub mailfs_copyout {
my $blank = 1;
while(<IN>) {
s/\r$//;
if($blank && /^From /) {
$msg_nr++;
exit(0) if ($msg_nr > $nr);