annotate Lib/IMPL.pm @ 155:05df123a2ff1

minor fixes
author wizard
date Thu, 30 Sep 2010 18:11:32 +0400
parents c2aa10fbb396
children 6ce1f052b90a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
147
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
1 package IMPL;
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
2 use strict;
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
3
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
4 use Exporter;
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
5 our @EXPORT_OK = qw( &Debug );
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
6
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
7 our $Debug = 1 unless defined $Debug;
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
8
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
9 sub Debug() {
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
10 $Debug
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
11 }
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
12
c2aa10fbb396 Post to dom improved
wizard
parents:
diff changeset
13 1;