/*
- * Copyright (c) 2010 Zmanda, Inc. All Rights Reserved.
+ * Copyright (c) 2010-2012 Zmanda, Inc. All Rights Reserved.
*
- * This program is free software; you can redistribute it and/or modify it
- * under the terms of the GNU General Public License version 2 as published
- * by the Free Software Foundation.
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License
+ * as published by the Free Software Foundation; either version 2
+ * of the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful, but
* WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
%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 %{
return Amanda::Feature::am_init_feature_set();
}
+sub Amanda::Feature::Set::features {
+ my $class = shift;
+ return Amanmda::Feature::features();
+}
+
+
package Amanda::Feature;
%}