Merge tag 'upstream/3.3.2'

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

diff --git a/perl/Amanda/Tapelist.swg b/perl/Amanda/Tapelist.swg
index b514cac9020648b3ab2b217cdd07556b0fc484c0..0ce1987bb8e94e4ec189a154180649ed1f6662a3 100644 (file)
--- a/perl/Amanda/Tapelist.swg
+++ b/perl/Amanda/Tapelist.swg
@@ -1,5 +1,5 @@
 /*
- * Copyright (c) 2008, 2009, 2010 Zmanda, Inc.  All Rights Reserved.
+ * Copyright (c) 2008-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
@@ -269,6 +269,7 @@ sub _update_positions {
 %}
 
 char *get_last_reusable_tape_label(int skip);
+%newobject list_new_tapes;
 char *list_new_tapes(int nb);
 
 /* C functions -- should be called *only* from within this module */