replacing calls to now-defunct function `interactive-p'