X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2FSpreadsheet%2FWriteExcel%2FWorksheet.pm;h=a3e6d16132c8b183d7738ce71cab953955c2af0c;hb=cf663350e6c614cc3704206b1389f1215ce481f5;hp=aa02220fa0b5f40fe5eacb44cee7dd804d83d50e;hpb=8c63e224aff1269ad7266a470885b5bbbbb9473e;p=p5sagit%2FExcel-Template.git

diff --git a/t/Spreadsheet/WriteExcel/Worksheet.pm b/t/Spreadsheet/WriteExcel/Worksheet.pm
index aa02220..a3e6d16 100644
--- a/t/Spreadsheet/WriteExcel/Worksheet.pm
+++ b/t/Spreadsheet/WriteExcel/Worksheet.pm
@@ -88,5 +88,32 @@ sub set_column {
     }
 }
 
+sub keep_leading_zeros {
+    my $self = shift;
+
+    {
+        local $" = "', '";
+        push @mock::calls, __PACKAGE__ . "::keep_leading_zeros( '@_' )";
+    }
+}
+
+sub insert_bitmap {
+    my $self = shift;
+
+    {
+        local $" = "', '";
+        push @mock::calls, __PACKAGE__ . "::insert_bitmap( '@_' )";
+    }
+}
+
+sub freeze_panes {
+    my $self = shift;
+
+    {
+        local $" = "', '";
+        push @mock::calls, __PACKAGE__ . "::freeze_panes( '@_' )";
+    }
+}
+
 1;
 __END__