missing value where TRUE/FALSE needed Error in ExomePeak

I download the source file of exomePeak (https://bioconductor.riken.jp/packages/3.0/bioc/src/contrib/exomePeak_1.6.0.tar.gz), Unzipped and made a change in one function

I ran R CMD build exomePeak in the terminal before uploading it to R Studio. However, I got the Error

Error: processing vignette 'exomePeak-Overview.Rnw' failed with diagnostics:
 chunk 3 (label = Peak Calling) 
Error in if (ID[1] == TRUE) { : missing value where TRUE/FALSE needed

1