First pass at adding key files
This commit is contained in:
27
site/slowtwitch.com/cgi-bin/articles/review.cgi
Executable file
27
site/slowtwitch.com/cgi-bin/articles/review.cgi
Executable file
@ -0,0 +1,27 @@
|
||||
#!/usr/local/bin/perl
|
||||
# ==================================================================
|
||||
# Gossamer Links - enhanced directory management system
|
||||
#
|
||||
# Website : http://gossamer-threads.com/
|
||||
# Support : http://gossamer-threads.com/scripts/support/
|
||||
# CVS Info : 087,071,086,086,085
|
||||
# Revision : $Id: review.cgi,v 1.7 2005/03/22 08:18:05 jagerman 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 '/var/home/slowtwitch/slowtwitch.com/cgi-bin/articles/admin';
|
||||
use Links qw/$PLG/;
|
||||
use Links::User::Review;
|
||||
|
||||
local $SIG{__DIE__} = \&Links::fatal;
|
||||
|
||||
Links::init('/var/home/slowtwitch/slowtwitch.com/cgi-bin/articles/admin');
|
||||
Links::init_user();
|
||||
|
||||
if ($PLG->dispatch('check_request', \&Links::check_request)) {
|
||||
$PLG->dispatch('handle_review', \&Links::User::Review::handle);
|
||||
}
|
Reference in New Issue
Block a user