fix bug print_r