--- cfg.pm 2004/11/16 19:32:40 1.3
+++ cfg.pm 2004/11/17 09:05:47 1.4
@@ -155,7 +155,7 @@
return;
}
-sub import {
+sub import { # ($$$$)
# ATTENTION: The OSSP cfg API function "import" conflicts with
# the standardized "import" method the Perl world expects from
# their modules. In order to keep the Perl binding consist
@@ -175,7 +175,7 @@
}
}
-sub export {
+sub export { # ($$$)
# ATTENTION: The OSSP cfg API function "export" conflicts with
# the standardized "export" method the Perl world expects from
# their modules. In order to keep the Perl binding consist
@@ -185,7 +185,7 @@
# the regular OSSP::cfg "export" method
my ($self, $node, $fmt) = @_;
my $out;
- $self->{-rc} = cfg_import($self->{-cfg}, $node, $fmt, $out, 0);
+ $self->{-rc} = cfg_export($self->{-cfg}, $node, $fmt, $out, 0);
return ($self->{-rc} == $self->CFG_OK ? $out : undef);
}
else {
|
