Imported Upstream version 3.3.1

[debian/amanda] / perl / Amanda / Util.swg

diff --git a/perl/Amanda/Util.swg b/perl/Amanda/Util.swg
index f7ebacaf968241c17d24555aa1be6316e1e61f5b..e325a9e0a918bad8ac0e5ed4bb549f55dc52d3f4 100644 (file)
--- a/perl/Amanda/Util.swg
+++ b/perl/Amanda/Util.swg
@@ -633,6 +633,16 @@ sub unmarshal_tapespec {
 
 %}
 
+amglue_export_ok(
+    match_host match_disk match_datestamp match_level
+);
+
+gboolean match_host(char *pat, char *value);
+gboolean match_disk(char *pat, char *value);
+gboolean match_datestamp(char *pat, char *value);
+gboolean match_level(char *pat, char *value);
+
+
 /* -------------------------------------------------------------------------
  * Functions below this line are only meant to be called within this module;
  * do not call them externally. */