Index: src/natools-smaz-tools.adb
==================================================================
--- src/natools-smaz-tools.adb
+++ src/natools-smaz-tools.adb
@@ -853,11 +853,11 @@
       Counts : in Dictionary_Counts;
       Method : in Methods.Enum)
      return Ada.Streams.Stream_Element
    is
       Result : Ada.Streams.Stream_Element := 0;
-      Worst_Score : Score_Value := Score_Encoded (Dict, Counts, 0);
+      Worst_Score : Score_Value := Score (Dict, Counts, 0, Method);
       S : Score_Value;
    begin
       for I in 1 .. Dict.Dict_Last loop
          S := Score (Dict, Counts, I, Method);