diff --git a/bin/ssa-info b/bin/ssa-info
index c41a543..dc3919c 100755
--- a/bin/ssa-info
+++ b/bin/ssa-info
@@ -48,6 +48,10 @@ section('Styles');
   my @sorted = map { sprintf('%s (%d)', $_, $stats->{$_}) }
     sort { $stats->{$b} <=> $stats->{$a} } keys %{ $stats };
   line(Usage => join(', ', @sorted));
+  $stats = $ssa->fonts_usage;
+  @sorted = map { sprintf('%s (%d)', $_, $stats->{$_}) }
+    sort { $stats->{$b} <=> $stats->{$a} } keys %{ $stats };
+  line(Fonts => join(', ', @sorted));
 }
 
 if (scalar @{ $ssa->{fonts} } > 0) {