#!@@_perl_root_@@/bin/perl.exe 
package ConfigPathdictyBase;

##########################################################
#                                                        #
# dictyBase Extension of ConfigPathdictyBase             #
#                                                        #
##########################################################

use ConfigPathdictyBase_base;
no warnings 'redefine';
BEGIN { %ConfigPathdictyBase:: = %ConfigPathdictyBase_base:: }

####################################################################
sub dictyBaseHtmlRoot {
####################################################################

    my $self = shift;

    return $self->dictyBaseMachineStem;

}

####################################################################
sub dictyBaseXSL {
####################################################################

    my $self = shift;

    return $self->dictyBaseMachineStem."xsl/";

}

#####################################################################
sub dataDir {
#####################################################################
    return "/usr/local/dicty/data/";
}

#####################################################################
sub logDir {
#####################################################################
    my ($self, $database) = @_;
    lc ($database);
    return "/usr/local/dicty/logs/"
}

#####################################################################
sub dataDir4web {
#####################################################################
    return "/usr/local/dicty/data/";
}

#####################################################################
sub ftpPubDir {
#####################################################################
    return "/usr/local/dicty/ftp/pub/";
}


#####################################################################
sub GCGDataDir {
#####################################################################
    return "/usr/local/dicty/data/GCG/";
}

#####################################################################
sub unixUtilDir {
#####################################################################
    return "/bin/";
}

#####################################################################
sub dictyBin {
#####################################################################
    return "/usr/local/dicty/bin/";
}
#####################################################################
1; ##################################################################
#####################################################################


