/usr/local/CPAN/ObjStore/ObjStore/Config.pm

• package ObjStore::Config
  • DEBUG
  • SCHEMA_VERSION
• EOF

use 5.00404;
use strict;
package ObjStore::Config;
require Exporter;
use vars qw(@ISA @EXPORT_OK $TMP_DBDIR $SCHEMA_DBDIR);
@ISA = 'Exporter';
@EXPORT_OK = qw($TMP_DBDIR $SCHEMA_DBDIR &DEBUG &SCHEMA_VERSION);

#---------------------------------------------------------------#

#   Enable support for ObjStore::debug() (not related to -DDEBUGGING)

sub DEBUG() { 1 };

#   Specify a directory for the schemas (and recompile):

$SCHEMA_DBDIR = $ENV{OSPERL_SCHEMA_DBDIR} ||
    'elvis:/data/research2/ODB/schema';

#   Specify a directory for temporary databases (posh, perltest, etc):

$TMP_DBDIR = $ENV{OSPERL_TMP_DBDIR} ||
    'elvis:/data/research2/ODB/tmp';

#   Paths should not have a trailing slash.

#---------------------------------------------------------------#

sub SCHEMA_VERSION() { '15' };  #do not edit!!

1;