Index: tools/smaz.adb
==================================================================
--- tools/smaz.adb
+++ tools/smaz.adb
@@ -775,10 +775,11 @@
                      Natools.Smaz.Tools.Simple_Dictionary_And_Pending
                        (Counter,
                         Handler.Dict_Size,
                         Selected,
                         Pending,
+                        Handler.Score_Method,
                         Handler.Max_Pending);
 
                      return Optimize_Dictionary
                        (Natools.Smaz.Tools.To_Dictionary (Selected, True),
                         Pending,
@@ -786,11 +787,12 @@
                         Handler.Job_Count,
                         Handler.Score_Method);
                   end;
                else
                   return Natools.Smaz.Tools.To_Dictionary
-                    (Natools.Smaz.Tools.Simple_Dictionary (Counter, 254),
+                    (Natools.Smaz.Tools.Simple_Dictionary
+                       (Counter, 254, Handler.Score_Method),
                      Handler.Vlen_Verbatim);
                end if;
             end;
       end case;
    end To_Dictionary;