groff-commit
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[groff] 02/07: grog: Tweak warning diagnostics.


From: G. Branden Robinson
Subject: [groff] 02/07: grog: Tweak warning diagnostics.
Date: Tue, 29 Jun 2021 00:19:21 -0400 (EDT)

gbranden pushed a commit to branch master
in repository groff.

commit 2577fa8d5fe95a2b07b2816d0b25fa68ae5e6565
Author: G. Branden Robinson <g.branden.robinson@gmail.com>
AuthorDate: Mon Jun 28 21:12:50 2021 +1000

    grog: Tweak warning diagnostics.
    
    * src/util/grog/grog.pl (process_arguments, construct_command): Tweak
      warning diagnostics to use a style where an empty argument will be
      easy to spot.
---
 ChangeLog              | 3 +++
 src/utils/grog/grog.pl | 6 +++---
 2 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index dda8171..cec7a28 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,6 +2,9 @@
 
        * src/utils/grog/grog.am (grog): Drop sed replacement of unused
        configuration variables @g@, @BINDIR@, @libdir@, and @EGREP@.
+       * src/utils/grog/grog.pl (process_arguments, construct_command):
+       Tweak warning diagnostics to use a style where an empty argument
+       will be easy to spot.
 
 2021-06-28  G. Branden Robinson <g.branden.robinson@gmail.com>
 
diff --git a/src/utils/grog/grog.pl b/src/utils/grog/grog.pl
index 25e77bb..964a05e 100644
--- a/src/utils/grog/grog.pl
+++ b/src/utils/grog/grog.pl
@@ -284,7 +284,7 @@ sub process_arguments {
        # arg finished
        next;
       } else {         # not a groff opt
-       &warn("unrecognized groff option: $arg");
+       &warn("unrecognized groff option '$arg'");
        push(@command, $arg);
        next;
       }
@@ -899,8 +899,8 @@ sub construct_command {
   for my $pkg (@requested_package) {
     if (grep(/$pkg/, @main_package)
        && ($pkg ne $inferred_main_package)) {
-      &warn("overriding inferred package 'm$inferred_main_package'"
-           . " with requested package 'm$pkg'");
+      &warn("overriding inferred package '$inferred_main_package'"
+           . " with requested package '$pkg'");
       $inferred_main_package = '';
     }
     push @msupp, '-m' . $pkg;



reply via email to

[Prev in Thread] Current Thread [Next in Thread]