require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&VN_KNOTE)) {
    sub VN_KNOTE {
	my($vp, $b) = @_;
	eval q( &KNOTE( ($vp->{v_selectinfo}->{vsi_selinfo}->{si_note}), ($b)));
    }
}
1;
