From 97d10a54426d2df2de1c765948989dfc88a316eb Mon Sep 17 00:00:00 2001
From: "Jannis M. Hoffmann" <jannis@fehcom.de>
Date: Sun, 26 Mar 2023 17:56:45 +0200
Subject: 1. corrected manifest 2. private node package 3. better error msg in
 Webmail/View 4. reduced send binaries on read

---
 lib/JWebmail/View/Webmail.pm | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'lib/JWebmail/View')

diff --git a/lib/JWebmail/View/Webmail.pm b/lib/JWebmail/View/Webmail.pm
index 464c97e..778253d 100644
--- a/lib/JWebmail/View/Webmail.pm
+++ b/lib/JWebmail/View/Webmail.pm
@@ -46,12 +46,14 @@ sub print_sizes2 {
 my sub dgt { "([[:digit:]]{$_[0]})" }
 
 sub parse_iso_date {
-    shift;
+    my ($_self, $in) = @_;
+
     state $rx = do { my $re = dgt(4).'-'.dgt(2).'-'.dgt(2).'T'.dgt(2).':'.dgt(2).':'.dgt(2); qr/$re/a };
-    my @d = shift =~ /$rx/;
+
+    my @d = $in =~ /$rx/;
     if (@d != 6) {
         # TODO
-        warn "issue when parsing date";
+        warn "issue when parsing date '$in'";
     }
     return {
         year  => $d[0],
-- 
cgit v1.2.3