#!/usr/bin/perl5
# ==================================================================
# Links SQL - enhanced directory management system
#
#   Website  : http://gossamer-threads.com/
#   Support  : http://gossamer-threads.com/scripts/support/
#   CVS Info : 087,070,083,092,087 
#   Revision : $Id: fave.cgi,v 1.25 2001/11/28 16:00:14 paul Exp $
#
# Copyright (c) 2001 Gossamer Threads Inc.  All Rights Reserved.
# Redistribution in part or in whole strictly prohibited. Please
# see LICENSE file for full details.
# ==================================================================

    use strict;
    use lib '/vol2/virtual/gay-links.com/cgi-bin/dir/admin';
    use Links qw/$DB $IN $USER $CFG/;

    Links::init('/vol2/virtual/gay-links.com/cgi-bin/dir/admin'); 
    Links::init_user('/vol2/virtual/gay-links.com/cgi-bin/dir/admin'); 

    use Plugins::MyLinks_SQL::Favorites;
    Links::reset_env( { load_user => 1 } ) if ($Links::PERSIST);

    local $SIG{__DIE__} = \&Links::fatal;
    if (Links->check_request()) {
        GT::Plugins->dispatch ($CFG->{admin_root_path} . '/Plugins', 'user_add_fave', \&Plugins::MyLinks_SQL::Favorites::handle);
    }