From a4126d67420269a578a96a36ea784ad7a1a538b0 Mon Sep 17 00:00:00 2001
From: Kenichi Ishigaki <ishigaki@cpan.org>
Date: Sat, 22 Dec 2018 05:20:14 +0900
Subject: [PATCH] show also a tag for a changed constant

---
 util/SQLiteUtil.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/util/SQLiteUtil.pm b/util/SQLiteUtil.pm
index be8f2be..43ab8a0 100644
--- a/util/SQLiteUtil.pm
+++ b/util/SQLiteUtil.pm
@@ -363,8 +363,8 @@ sub check_api_history {
           next;
         }
         my $diff = Array::Diff->diff($current{$key}, $constants{$key});
-        print "$version: added $_\n" for @{$diff->added || []};
-        print "$version: deleted $_\n" for @{$diff->deleted || []};
+        print "$version: added $_ ($key)\n" for @{$diff->added || []};
+        print "$version: deleted $_ ($key)\n" for @{$diff->deleted || []};
       }
     }
     %current = %constants;