Problem with cygwin bash and cvs emacs

[Peter Lee]

With 21.3 I had the following in my .emacs:

(add-hook 'comint-output-filter-functions 'comint-strip-ctrl-m)

and I had no problems executing system commands from a cygwin bash
shell and receiving output.

--------------------

This no longer is working however in cvs.  I noticed in comint.el
that comint-output-filter-functions has been made buffer local.

So I tried this:

(defun my-comint-mode-hook ()
  (add-hook 'comint-output-filter-functions 'comint-strip-ctrl-m))
(add-hook 'comint-mode-hook 'my-comint-mode-hook)

But it didn't work.  If, from the shell, I do 'ping localhost' I get
a bunch of blank space where the output should have been.  If I 
'ping localhost > tmp.txt' and edit that file I see:

^M^M
Pinging blah.bl.org [127.0.0.1] with 32 bytes of data:^M^M
^M^M
Reply from 127.0.0.1: bytes=32 time<1ms TTL=128^M^M
Reply from 127.0.0.1: bytes=32 time<1ms TTL=128^M^M
Reply from 127.0.0.1: bytes=32 time<1ms TTL=128^M^M
Reply from 127.0.0.1: bytes=32 time<1ms TTL=128^M^M
^M^M
Ping statistics for 127.0.0.1:^M^M
    Packets: Sent = 4, Received = 4, Lost = 0 (0% loss),^M^M
Approximate round trip times in milli-seconds:^M^M
    Minimum = 0ms, Maximum = 0ms, Average = 0ms^M^M


So I'm pretty sure I'm on the right track (that being the ctrl-m's
are why I'm not seeing any output).  Just not sure why
my-comint-mode-hook didn't fix it.

Any ideas?