... of course, that would be better still if I remembered to update

`nvalid'. Ahem.

[originally from svn r2428]

diff --git a/charset/sbcsgen.pl b/charset/sbcsgen.pl
index 355bf3bc48a00d833123af588a16c98810634b0d..6a070f406f6259b37beffb979953e33c0d064756 100644 (file)
--- a/charset/sbcsgen.pl
+++ b/charset/sbcsgen.pl
@@ -102,7 +102,7 @@ sub outcharset($$$) {
        }
        $j++;
     }
-    printf "\n    },\n    %d\n", scalar @sorted;
+    printf "\n    },\n    %d\n", $j;
     print "};\n";
     print "const charset_spec charset_$name = {\n" .
           "    $name, read_sbcs, write_sbcs, &data_$name\n};\n\n";