Changed dpm to dprint_r