perl/Gedafe/Global.pm

# Gedafe, the Generic Database Frontend
# copyright (c) 2000-2003 ETH Zurich
# see http://isg.ee.ethz.ch/tools/gedafe/

# released under the GNU General Public License

package Gedafe::Global;

use strict;

use vars qw(@ISA @EXPORT_OK %g);

# %g  -> global data

require Exporter;
@ISA       = qw(Exporter);
@EXPORT_OK = qw(%g);

1;
1	dpavlin	1	# Gedafe, the Generic Database Frontend
2			# copyright (c) 2000-2003 ETH Zurich
3			# see http://isg.ee.ethz.ch/tools/gedafe/
4
5			# released under the GNU General Public License
6
7			package Gedafe::Global;
8
9			use strict;
10
11			use vars qw(@ISA @EXPORT_OK %g);
12
13			# %g -> global data
14
15			require Exporter;
16			@ISA = qw(Exporter);
17			@EXPORT_OK = qw(%g);
18
19			1;