small bugfix
This commit is contained in:
parent
264fc0fedd
commit
69a3b7e8ae
|
|
@ -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;
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue