Fix listing of volume labels (in particular in PAX archives).

[chaz/tar] / src / delete.c

diff --git a/src/delete.c b/src/delete.c
index a67993cb9be91e92b2d5677622ddde372099cf41..8f729ba20a3fe4fe56984e0fe33e434b2c63f416 100644 (file)
--- a/src/delete.c
+++ b/src/delete.c
@@ -1,7 +1,7 @@
 /* Delete entries from a tar archive.
 
    Copyright (C) 1988, 1992, 1994, 1996, 1997, 2000, 2001, 2003, 2004,
-   2005, 2006 Free Software Foundation, Inc.
+   2005, 2006, 2010 Free Software Foundation, Inc.
 
    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
@@ -165,7 +165,9 @@ delete_archive_members (void)
 
   do
     {
-      enum read_header status = read_header (true);
+      enum read_header status = read_header (&current_header,
+                                             &current_stat_info,
+                                             true);
 
       switch (status)
        {
@@ -260,7 +262,7 @@ delete_archive_members (void)
 
          if (current_block == record_end)
            flush_archive ();
-         status = read_header (false);
+         status = read_header (&current_header, &current_stat_info, false);
 
          xheader_decode (&current_stat_info);