Mercurial > hg > Applications > Calcon

comparison Calcon.pm @ 3:cb79baed256e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
remove Exporter to avoid "can't locate object method nw". Why this can happen?
author kono
date Sat, 25 Jan 2003 12:43:45 +0900
parents 144819f5d2f6
children d3e2e1d1a16c
comparison
equal deleted inserted replaced
1:144819f5d2f6 3:cb79baed256e
2 2
3 ## $Id$ 3 ## $Id$
4 4
5 use 5.008; 5 use 5.008;
6 use strict; 6 use strict;
7 use warnings; 7 # use warnings;
8 8
9 require Exporter; 9 #require Exporter;
10 10
11 our @ISA = qw(Exporter); 11 #our @ISA = qw(Exporter);
12 12
13 # Items to export into callers namespace by default. Note: do not export 13 # Items to export into callers namespace by default. Note: do not export
14 # names by default without a very good reason. Use EXPORT_OK instead. 14 # names by default without a very good reason. Use EXPORT_OK instead.
15 # Do not simply export all your public functions/methods/constants. 15 # Do not simply export all your public functions/methods/constants.
16 16
17 # This allows declaration use Calcon ':all'; 17 # This allows declaration use Calcon ':all';
18 # If you do not need this, moving things directly into @EXPORT or @EXPORT_OK 18 # If you do not need this, moving things directly into @EXPORT or @EXPORT_OK
19 # will save memory. 19 # will save memory.
20 our %EXPORT_TAGS = ( 'all' => [ qw( 20 #our %EXPORT_TAGS = ( 'all' => [ qw(
21 21 #
22 ) ] ); 22 #) ] );
23 23
24 our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } ); 24 #our @EXPORT_OK = ( @{ $EXPORT_TAGS{'all'} } );
25 25
26 our @EXPORT = qw( 26 #our @EXPORT = qw(
27 27
28 ); 28 #);
29 29
30 our $VERSION = '0.01'; 30 our $VERSION = '0.01';
31 31
32 32
33 # Preloaded methods go here. 33 # Preloaded methods go here.