{
    $OUT = "";
    if ((%pptpd) and (exists $pptpd{Interfaces}))
    {
	$OUT .=<<'EOF';
    # Destroy the old chain and put in the new one.
    /sbin/iptables --replace PPPconn 1 \
	--jump $NEW_PPPconn
    /sbin/iptables --flush $OLD_PPPconn
    /sbin/iptables --delete-chain $OLD_PPPconn
EOF
    }
}
