diff options
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | ext/win32ole/win32ole.c | 9 |
2 files changed, 11 insertions, 3 deletions
@@ -1,3 +1,8 @@ +Wed Jun 23 00:20:20 Hirokazu Yamamoto <ocean@m2.ccsnet.ne.jp> + + * ext/win32ole/win32ole.c (ole_hresult2msg): remove trailing + CR and LF. (doesn't depend on CR+LF) [ruby-dev:23694] + Wed Jun 23 00:00:25 2004 Nobuyoshi Nakada <nobu@ruby-lang.org> * io.c (rb_io_initialize): should check fcntl result. [ruby-dev:23742] diff --git a/ext/win32ole/win32ole.c b/ext/win32ole/win32ole.c index 6ca0668039..a24023f34b 100644 --- a/ext/win32ole/win32ole.c +++ b/ext/win32ole/win32ole.c @@ -501,9 +501,12 @@ ole_hresult2msg(hr) NULL, hr, LOCALE_SYSTEM_DEFAULT, (LPTSTR)&p_msg, 0, NULL); if (dwCount > 0) { - term = strrchr(p_msg, '\r'); - if (term) { - *term = '\0'; + term = p_msg + strlen(p_msg); + while (p_msg < term) { + term--; + if (*term == '\r' || *term == '\n') + *term = '\0'; + else break; } if (p_msg[0] != '\0') { rb_str_cat2(msg, p_msg); |