fix the bug in sampleName<- method #129
Merge branch 'trunk'