… | … | ||
---|---|---|---|
26 | =cut | 26 | =cut |
27 | 27 | ||
28 | package Guard; | 28 | package Guard; |
29 | 29 | ||
30 | BEGIN { | 30 | BEGIN { |
31 | $VERSION = '0.01'; | 31 | $VERSION = '0.1'; |
32 | @ISA = qw(Exporter); | 32 | @ISA = qw(Exporter); |
33 | @EXPORT = qw(guard scope_guard cancel); | 33 | @EXPORT = qw(guard scope_guard); |
34 | 34 | ||
35 | require Exporter; | 35 | require Exporter; |
36 | 36 | ||
37 | require XSLoader; | 37 | require XSLoader; |
38 | XSLoader::load Guard, $VERSION; | 38 | XSLoader::load Guard, $VERSION; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |