Fixed setup_prolog_locale/0.

SWI-Prolog · Nov 16, 2024 · edefcf3 · edefcf3
1 parent 39d29f2
commit edefcf3
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/library/prolog_locale.pl b/library/prolog_locale.pl
@@ -58,10 +58,10 @@
                   ]),
     set_locale(prolog),
     add_write_option(answer_write_options, integer_format('~:d')),
-    add_write_option(debug_write_options, integer_format('~:d')),
+    add_write_option(debugger_write_options, integer_format('~:d')),
     add_write_option(print_write_options, integer_format('~:d')).
 
-add_write_option(Set, Option) :-
-    current_prolog_flag(Set, List),
+add_write_option(Set, Option),
+    current_prolog_flag(Set, List) =>
     set_prolog_flag(Set, [Option|List]).