poi: BUG 60273 -- Use codepageutil to get correct charset in VBAMacro…

…Reader
antony-liu · Mar 13, 2024 · 8f43183 · 8f43183
1 parent bbef5f9
commit 8f43183
Show file tree

Hide file tree

Showing 2 changed files with 11 additions and 0 deletions.
diff --git a/testcases/main/POIFS/Macros/TestVBAMacroReader.cs b/testcases/main/POIFS/Macros/TestVBAMacroReader.cs
@@ -342,5 +342,16 @@ public void Bug60158()
  Assert.IsNotNull(macros["NewMacros"]);
  StringAssert.Contains("' dirty", macros["NewMacros"]);
  }
+
+ [Test]
+ public void Bug60273()
+ {
+ //test file derives from govdocs1 147240.xls
+ FileInfo f = POIDataSamples.GetSpreadSheetInstance().GetFileInfo("60273.xls");
+ VBAMacroReader r = new VBAMacroReader(f);
+ Dictionary<string, string> macros = r.ReadMacros();
+ Assert.IsNotNull(macros["Module1"]);
+ StringAssert.Contains("9/8/2004", macros["Module1"]);
+ }
  }
 }
diff --git a/testcases/test-data/spreadsheet/60273.xls b/testcases/test-data/spreadsheet/60273.xls