From e9becc267ca0635349aab56f4b69385c3e75a618 Mon Sep 17 00:00:00 2001
From: Kei Tsuchiya <kei.tsuchiya86@gmail.com>
Date: Fri, 10 Jan 2020 00:57:27 +0900
Subject: [PATCH] workaround for year 2020 problem

---
 bin/pt-query-digest | 1 +
 1 file changed, 1 insertion(+)

diff --git a/bin/pt-query-digest b/bin/pt-query-digest
index e3a5dfcb..e2ab087a 100755
--- a/bin/pt-query-digest
+++ b/bin/pt-query-digest
@@ -3666,6 +3666,7 @@ sub parse_event {
       $pos_in_log -= 1 if $pos_in_log;
 
       $raw_packet =~ s/\n20\Z//;
+      $raw_packet = "20$raw_packet" if $raw_packet =~ /\A20-\d\d-\d\d/; # workaround for 2020 problem
       $raw_packet = "20$raw_packet" unless $raw_packet =~ m/\A20/;
 
       $raw_packet =~ s/0x0000:.+?(450.) /0x0000:  $1 /;