Error triggered by "Clear All" when there are three or more drawn objects.

[warnes]

When there are three or more drawn objects, using "Clear all" will throw the error:

Warning: Error in if: argument is of length zero

from modules.R:186:

if(length(loc) > 0) {

Version Information:

> version
               _                           
platform       x86_64-apple-darwin17.0     
arch           x86_64                      
os             darwin17.0                  
system         x86_64, darwin17.0          
status                                     
major          4                           
minor          2.2                         
year           2022                        
month          10                          
day            31                          
svn rev        83211                       
language       R                           
version.string R version 4.2.2 (2022-10-31)
nickname       Innocent and Trusting       
> packageVersion("mapedit")
[1] ‘0.6.0’