small bugfix

This commit is contained in:
tipaul 2003-02-28 16:29:11 +00:00
parent 264fc0fedd
commit 69a3b7e8ae
1 changed files with 1 additions and 1 deletions

View File

@ -127,7 +127,7 @@ sub checkvalidisbn {
$q=~s/X.//g;
#return 0 if $q is not ten digits long
if ($length($q)!=10) {
if (length($q)!=10) {
return 0;
}