diff options
| author | Matthew Somerville <matthew@mysociety.org> | 2012-11-09 18:08:05 +0000 |
|---|---|---|
| committer | Matthew Somerville <matthew@mysociety.org> | 2012-11-09 18:08:05 +0000 |
| commit | c0e4463163d4a9b9a8be073964ef960b114c9ea0 (patch) | |
| tree | 8724404283e105fb04b857210825ec78cad1e7cb /perllib/Utils.pm | |
| parent | 55fd02987a0816d9d1c8a76b67fa2d44f8d57264 (diff) | |
Some fixes for when warnings are on during test run.
Diffstat (limited to 'perllib/Utils.pm')
| -rw-r--r-- | perllib/Utils.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perllib/Utils.pm b/perllib/Utils.pm index 09c7386b4..ab7bc6e12 100644 --- a/perllib/Utils.pm +++ b/perllib/Utils.pm @@ -241,6 +241,7 @@ sub cleanup_text { sub prettify_epoch { my ( $epoch, $type ) = @_; + $type ||= ''; $type = 'short' if $type eq '1'; my $dt = DateTime->from_epoch( epoch => $epoch, time_zone => 'local' ); |