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:10:17 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> * eval.c (return_jump, break_jump): raise unexpceted local jump diff --git a/ext/win32ole/win32ole.c b/ext/win32ole/win32ole.c index f856cd251..0e9c53f01 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); |