Error at running spliceCorrection()

[aloboa]

Given
https://www.dropbox.com/s/k999cou1tn4gjp3/certec100020.asd
I do:

testraw <- readASD("certec100020.asd", out_format = 'list')
testrefl <- data.frame(Wavelength=testraw$certec100020.asd$wavelength, Reflectance=testraw$certec100020.asd$reflectance)
ggplot(data=testrefl) +
  geom_line(aes(x=Wavelength, y=Reflectance), linewidth=0.1) +
  geom_point(aes(x=Wavelength, y=Reflectance))

But:

testreflspcor <-  spliceCorrection(testrefl$Reflectance, wav=testrefl$Wavelength)
Error in spliceCorrection(testrefl$Reflectance, wav = testrefl$Wavelength) : 
  object 'index_b' not found

A bug or something I'm not understanding?
An example in the doc would be much appreciated.

[aloboa]

Works fine with version 0.2.7 -- cakes
Please add the example.

[aloboa]

Actually, I have to state
testreflspcor <- spliceCorrection(testrefl$Reflectance, wav=testrefl$Wavelength ,splice = c(1000, 1800))

instead of the default splice=c(1000, 1830)
It might be specific to the FS3 I'm using.