projects
/
debian
/
amanda
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Imported Upstream version 3.3.1
[debian/amanda]
/
perl
/
Amanda
/
Feature.swg
diff --git
a/perl/Amanda/Feature.swg
b/perl/Amanda/Feature.swg
index e20e4b6fb5d8a3b9ae3bde3dcb60562d1f00fbdc..a66f39ab03ed6c5e6edd5348b984ef0402cc859e 100644
(file)
--- a/
perl/Amanda/Feature.swg
+++ b/
perl/Amanda/Feature.swg
@@
-63,7
+63,9
@@
extern Set *am_string_to_feature(char *s);
%newobject am_set_default_feature_set;
extern Set *am_set_default_feature_set(void);
%newobject am_init_feature_set;
%newobject am_set_default_feature_set;
extern Set *am_set_default_feature_set(void);
%newobject am_init_feature_set;
-extern Set *am_init_feature_set(void);
+extern Set *am_init_feature_set();
+%newobject features;
+extern am_feature_t *am_features(Set *);
%perlcode %{
%perlcode %{
@@
-89,6
+91,12
@@
sub Amanda::Feature::Set::mine {
return Amanda::Feature::am_init_feature_set();
}
return Amanda::Feature::am_init_feature_set();
}
+sub Amanda::Feature::Set::features {
+ my $class = shift;
+ return Amanmda::Feature::features();
+}
+
+
package Amanda::Feature;
%}
package Amanda::Feature;
%}