version 1.7, 2003/10/20 16:14:08
|
version 1.8, 2003/10/20 16:25:33
|
Line 28
|
Line 28
|
# Coded by Guy Ashkenazi, guy@fh.huji.ac.il |
# Coded by Guy Ashkenazi, guy@fh.huji.ac.il |
# Based on the work of Peter Ertl, peter.ertl@pharma.novartis.com |
# Based on the work of Peter Ertl, peter.ertl@pharma.novartis.com |
|
|
|
|
|
|
use strict; |
use strict; |
|
|
|
### FOR LON-CAPA set $loncapa to 1 and uncomment both uses |
|
### For standalone operation, set $loncapa to 0, and comment out both uses |
|
my $loncapa=1; |
use lib '/home/httpd/lib/perl'; |
use lib '/home/httpd/lib/perl'; |
|
use LONCAPA::loncgi(); |
|
|
|
|
use GD; |
use GD; |
use PostScript::Simple; |
use PostScript::Simple; |
use LONCAPA::loncgi(); |
|
|
|
if ($loncapa) { |
if ($loncapa) { |
if (! &LONCAPA::loncgi::check_cookie_and_load_env()) { |
if (! &LONCAPA::loncgi::check_cookie_and_load_env()) { |