diff --git a/CHANGELOG.yml b/CHANGELOG.yml
index a42d24e..5b5c11b 100644
--- a/CHANGELOG.yml
+++ b/CHANGELOG.yml
@@ -7,11 +7,9 @@ releases:
     changes:
       - Initial release
 change_types:
-  - feat:
-      level: minor
-      title: Features
-    keywords: []
-  - fix:
-      level: patch
-      title: Bug fixes
-    keywords: []
+  - level: minor
+    title: Features
+    keywords: [ feat ]
+  - level: patch
+    title: Bug fixes
+    keywords: [ fix ]
diff --git a/lib/App/Changelord.pm b/lib/App/Changelord.pm
index e97fde0..2a91a2e 100644
--- a/lib/App/Changelord.pm
+++ b/lib/App/Changelord.pm
@@ -15,6 +15,12 @@ use List::AllUtils qw/ pairmap partition_by /;
 
 use App::Changelord::Role::ChangeTypes;
 
+sub run($self) {
+    App::Changelord::Command::Print->new(
+        parent_command => $self,
+    )->run;
+}
+
 subcommand $_ => 'App::Changelord::Command::' . ucfirst $_ =~ s/-(.)/uc $1/er
     for qw/ schema validate version bump init add git-gather print /;