X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fapropos.pl;fp=cmd%2Fapropos.pl;h=d3def0cd5dffe9230122ff759d0e68fc22377a55;hb=fb784507f128464864f521c9b45ac6d3d6c49367;hp=9b7bcde9c4ce50e8d70f806d91e8ad0472e4470a;hpb=cd91defa2fd138b6bbd6d7bd71542c8d931357da;p=spider.git

diff --git a/cmd/apropos.pl b/cmd/apropos.pl
index 9b7bcde9..d3def0cd 100644
--- a/cmd/apropos.pl
+++ b/cmd/apropos.pl
@@ -44,6 +44,7 @@ my $include;
 foreach $in (<$defh>) {
 	next if $in =~ /^\#/;
 	chomp $in;
+	$in =~ s/\r$//;
 	if ($in =~ /^===/) {
 		$cmd{$cmd} = "$cmd $desc" if $include;
 		$include = 0;
@@ -66,6 +67,7 @@ if ($h) {
 	foreach $in (<$h>) {
 		next if $in =~ /^\#/;
 		chomp $in;
+		$in =~ s/\r$//;
 		if ($in =~ /^===/) {
 			$cmd{$cmd} = "$cmd $desc" if $include;
 			$include = 0;