diff options
| -rw-r--r-- | ChangeLog | 6 | ||||
| -rw-r--r-- | ext/win32ole/tests/testOLETYPELIB.rb | 2 | ||||
| -rw-r--r-- | ext/win32ole/tests/testWIN32OLE.rb | 18 |
3 files changed, 24 insertions, 2 deletions
@@ -1,3 +1,9 @@ +Fri Apr 15 22:40:19 2005 Masaki Suketa <masaki.suketa@nifty.ne.jp> + + * ext/win32ole/tests/testWIN32OLE.rb: add test for WIN32OLE.codepage= + + * ext/win32ole/tests/testOLETYPELIB.rb: correct expected message. + Fri Apr 15 22:04:07 2005 Masaki Suketa <masaki.suketa@nifty.ne.jp> * ext/win32ole/win32ole.c(ole_invoke): retry after converting Qnil diff --git a/ext/win32ole/tests/testOLETYPELIB.rb b/ext/win32ole/tests/testOLETYPELIB.rb index 9248ecfefb..ceb246930f 100644 --- a/ext/win32ole/tests/testOLETYPELIB.rb +++ b/ext/win32ole/tests/testOLETYPELIB.rb @@ -21,7 +21,7 @@ class TestOLETYPELIB < Test::Unit::TestCase msg = $!.to_s exception_occured = true end - assert_equal("Not found type library `NON EXIST TYPELIB`", msg) + assert_equal("not found type library `NON EXIST TYPELIB`", msg) assert(exception_occured) end diff --git a/ext/win32ole/tests/testWIN32OLE.rb b/ext/win32ole/tests/testWIN32OLE.rb index 379eca315d..ca966f0cce 100644 --- a/ext/win32ole/tests/testWIN32OLE.rb +++ b/ext/win32ole/tests/testWIN32OLE.rb @@ -41,7 +41,7 @@ class TestWin32OLE < RUNIT::TestCase exc = assert_exception(WIN32OLERuntimeError) { WIN32OLE.new("{000}") } - assert_match(/Unknown OLE server: `\{000\}'/, exc.message) + assert_match(/unknown OLE server: `\{000\}'/, exc.message) end def test_s_connect excel2 = WIN32OLE.connect('Excel.Application') @@ -96,6 +96,22 @@ class TestWin32OLE < RUNIT::TestCase assert_equal(65001, WIN32OLE::CP_UTF8) end + def test_s_codepage_changed + book = @excel.workbooks.add + sheet = book.worksheets(1) + begin + WIN32OLE.codepage = WIN32OLE::CP_UTF8 + sheet.range("A1").value = [0x3042].pack("U*") + val = sheet.range("A1").value + assert_equal("\343\201\202", val) + WIN32OLE.codepage = WIN32OLE::CP_ACP + val = sheet.range("A1").value + assert_equal("\202\240", val) + ensure + book.saved = true + end + end + def test_get_win32ole_object workbooks = @excel.Workbooks; assert_instance_of(WIN32OLE, workbooks) |