# ipdb/cgi-bin/MyIPDB.pm
# Contains site-specific functions for IPDB
# May override some functions from IPDB.pm, wraps others
###
# SVN revision info
# $Date: 2005-01-28 19:04:55 +0000 (Fri, 28 Jan 2005) $
# SVN revision $Rev: 142 $
# Last update by $Author: kdeugau $
###
# Copyright (C) 2004,2005 - Kris Deugau

use IPDB 2.0 qw(:ALL);

## connectDB_My()
# Wrapper for IPDB::connectDB
# Takes no arguments, returns whatever IPDB::connectDB returns.
sub connectDB_My {
  return connectDB("ipdb", "ipdb", "ipdbpwd");
} # end connectDB_My()

# Keep Perl from complaining.
1;