Index: source/texk/web2c/luatexdir/tex/linebreak.w
===================================================================
--- source/texk/web2c/luatexdir/tex/linebreak.w	(révision 5187)
+++ source/texk/web2c/luatexdir/tex/linebreak.w	(copie de travail)
@@ -1950,7 +1950,7 @@
                 /* The following code knows that discretionary texts contain
                    only character nodes, kern nodes, box nodes, and rule
                    nodes. */
-                if (second_pass) {
+                if (second_pass || subtype(cur_p) == discretionary_disc) {
                     int actual_penalty = hyphen_penalty;
                     if (subtype(cur_p) == automatic_disc)
                         actual_penalty = ex_hyphen_penalty;

