Bugfix: libptopgen_new now works when protogeni_exclude is non-numeric.

7cc8f51e · Jonathon Duerig · 85049860 · 7cc8f51e
Commit 7cc8f51e authored Oct 05, 2011 by Jonathon Duerig
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

tbsetup/libptop_new.pm.in tbsetup/libptop_new.pm.in +1 -1

No files found.
--- a/tbsetup/libptop_new.pm.in
+++ b/tbsetup/libptop_new.pm.in
@@ -1028,7 +1028,7 @@ sub calculateWillPrint($;$)
    # In geni mode, disallow nodes tagged protogeni_exclude from being printed.
    my $geniExclude = 0;
    $node->NodeAttribute("protogeni_exclude", \$geniExclude);
-    my $geniok = (! defined($geniExclude) || $geniExclude == 0);
+    my $geniok = (! defined($geniExclude) || ! $geniExclude);
    my $result = 
 	(! $available_only || $self->available())
 	&& (! $genimode || $geniok)