fix a bug introduced in a prev commit
fix a bug introduced in a prev commit

omasanori/picrin,leavesbnw/picrin,picrin-scheme/picrin,koba-e964/picrin,ktakashi/picrin,leavesbnw/picrin,dcurrie/picrin,ktakashi/picrin,picrin-scheme/picrin,leavesbnw/picrin,koba-e964/picrin,omasanori/picrin,ktakashi/picrin,koba-e964/picrin,dcurrie/picrin