X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/runlisp/blobdiff_plain/cf51f4b4b4e376229851b142411b81f7b0fd8877..13cc23c5d624a4a61a5b378a998fc62ac293a5a7:/dump-runlisp-image.c

diff --git a/dump-runlisp-image.c b/dump-runlisp-image.c
index 836dc54..72ce97d 100644
--- a/dump-runlisp-image.c
+++ b/dump-runlisp-image.c
@@ -547,6 +547,7 @@ static void notice_filename(const char *p, size_t sz)
   if (!node) {
     node = xmalloc(sizeof(*node));
     treap_insert(&good, &path, node, p, sz);
+    if (verbose >= 3) moan("noticed non-junk file `%.*s'", (int)sz, p);
   }
 }
 
@@ -1346,20 +1347,20 @@ static void help(FILE *fp)
 {
   version(fp); fputc('\n', fp); usage(fp);
   fputs("\n\
-Help options:\n\
+Help options\n\
   -h, --help			Show this help text and exit successfully.\n\
   -V, --version			Show version number and exit successfully.\n\
 \n\
-Diagnostics:\n\
+Diagnostics\n\
   -n, --dry-run			Don't run run anything (useful with `-v').\n\
   -q, --quiet			Don't print warning messages.\n\
   -v, --verbose			Print informational messages (repeatable).\n\
 \n\
-Configuration:\n\
+Configuration\n\
   -c, --config-file=CONF	Read configuration from CONF (repeatable).\n\
   -o, --set-option=[SECT:]VAR=VAL Set configuration variable (repeatable).\n\
 \n\
-Image dumping:\n\
+Image dumping\n\
   -O, --output=FILE|DIR		Store image(s) in FILE or DIR.\n\
   -R, --remove-other		Delete image files for other Lisp systems.\n\
   -U, --remove-unknown		Delete unrecognized files in image dir.\n\