From: Nathaniel Wesley Filardo Date: Mon, 2 Mar 2015 23:49:55 +0000 (-0500) Subject: Suppress printout of (-N) in worthless sections X-Git-Url: https://hydra-www.ietfng.org/gitweb/?a=commitdiff_plain;h=f4b0379a18102fe9dec2984d57c3428ffa615bb3;p=grade Suppress printout of (-N) in worthless sections --- diff --git a/grade.pl b/grade.pl index 1a3a77f..737fe14 100755 --- a/grade.pl +++ b/grade.pl @@ -93,7 +93,11 @@ sub doDing($) { # {{{ } else { $dingsum += $1; } - push @$dingtext, "($1)"; + # If the section has point value, label the deduction here + # with its value. Zero-point sections don't merit the clutter. + if ($secmax != 0) { + push @$dingtext, "($1)"; + } untilDefinesDot(sub ($) { push @$dingtext, @_; }); push @$dingtext, ""; return;