X-Git-Url: https://git.dogcows.com/gitweb?a=blobdiff_plain;f=src%2Fcreate.c;h=b04b3a81bd24ce1ad9a6e898e8f5b19bf5d36bf6;hb=04f1deefad399bcf5bec6bb6afc2a0a53c498025;hp=de09f9f558c13c93fc6da394048c8e959a6eb5da;hpb=3f3860fd6ae8f77346280cf707ef2f9c57f414ea;p=chaz%2Ftar

diff --git a/src/create.c b/src/create.c
index de09f9f..b04b3a8 100644
--- a/src/create.c
+++ b/src/create.c
@@ -152,7 +152,7 @@ to_chars (int negative, uintmax_t value, size_t valsize,
       if (! warned_once)
 	{
 	  warned_once = 1;
-	  WARN ((0, 0, _("Generating negative octal headers\n")));
+	  WARN ((0, 0, _("Generating negative octal headers")));
 	}
       where[size - 1] = '\0';
       to_octal (value & MAX_VAL_WITH_DIGITS (valsize * CHAR_BIT, 1),
@@ -567,8 +567,6 @@ finish_header (union block *header)
 
   uintmax_to_chars ((uintmax_t) sum, header->header.chksum, 7);
 
-  set_next_block_after (header);
-
   if (verbose_option
       && header->header.typeflag != GNUTYPE_LONGLINK
       && header->header.typeflag != GNUTYPE_LONGNAME)
@@ -580,6 +578,8 @@ finish_header (union block *header)
       current_format = archive_format;
       print_header ();
     }
+
+  set_next_block_after (header);
 }
 
 /* Sparse file processing.  */
@@ -1555,6 +1555,13 @@ dump_file (char *p, int top_level, dev_t parent_device)
       else if (S_ISFIFO (current_stat.st_mode)
 	       || S_ISSOCK (current_stat.st_mode))
 	type = FIFOTYPE;
+#ifdef S_ISDOOR
+      else if (S_ISDOOR (current_stat.st_mode))
+	{
+	  WARN ((0, 0, _("%s: door ignored"), p));
+	  return;
+	}
+#endif
       else
 	goto unknown;
     }