sub include {
use vars qw($m);
- use Carp;
- carp 'include deprecated; use an HTML::Mason <& &> style include (or $m->scomp)';
+ #warn 'include deprecated; use an HTML::Mason <& &> style include (or $m->scomp) at '. $m->callers(0)->path. "\n";
$m->scomp(@_);
}