#!/usr/bin/perl
# Mark given Pro tip as seen by the current user

require './virtual-server-lib.pl';
&ReadParse();
&set_seen_pro_tip($in{'tipid'} . ($in{'remind'} ? '_reminder' : undef)) if ($in{'tipid'});
&redirect($in{'return_url'} || &get_referer_relative());