summaryrefslogtreecommitdiffabout
authorSergey Poznyakoff <gray@gnu.org>2019-10-13 05:18:38 (GMT)
committer Sergey Poznyakoff <gray@gnu.org>2019-10-13 05:18:38 (GMT)
commit19cdb79424d5580720444bf383a4c385f72d4052 (patch) (side-by-side diff)
treedf3d703f423f24f2988fa4cb282e96b1fa115dcd
parent3760d6d6e544fe1a76a4496c4ef1068bbcc855f7 (diff)
downloadmailutils-19cdb79424d5580720444bf383a4c385f72d4052.tar.gz
mailutils-19cdb79424d5580720444bf383a4c385f72d4052.tar.bz2
Minor fixes
Diffstat (more/less context) (ignore whitespace changes)
-rw-r--r--mh/tests/ali.at4
-rwxr-xr-xmu-aux/gencl11
2 files changed, 6 insertions, 9 deletions
diff --git a/mh/tests/ali.at b/mh/tests/ali.at
index fd5e08c..102d5cb 100644
--- a/mh/tests/ali.at
+++ b/mh/tests/ali.at
@@ -85,9 +85,9 @@ ali -a ./mh_aliases korzen | tr -d ' '
[expout])
MH_CHECK([ali: group id],[ali05 ali-group-id ali-gid],[
-cat /etc/passwd | awk -F : '/^#/ { next } $4==0 { print $1 }' > expout
+awk -F : '/^#/ { next } $4==0 { print $1 } /etc/passwd' > expout
test -s expout || AT_SKIP_TEST
-name=`awk -F : '/^#/ { next } $3==0 { print $1 }' /etc/group < /dev/null`
+name=`awk -F : '/^#/ { next } $3==0 { print $1 }' /etc/group`
test -z "$name" && AT_SKIP_TEST
echo "korzen: +$name" > mh_aliases
diff --git a/mu-aux/gencl b/mu-aux/gencl
index 715b6bd..0419d81 100755
--- a/mu-aux/gencl
+++ b/mu-aux/gencl
@@ -1,7 +1,7 @@
-eval '(exit $?0)' && eval 'exec perl -wS "$0" "$@"'
- & eval 'exec perl -wS "$0" $argv:q'
+#!/bin/sh
+#! -*-perl-*-
+eval 'exec perl -x -wS $0 ${1+"$@"}'
if 0;
-
# This file is part of GNU Mailutils.
# Copyright (C) 2017-2019 Free Software Foundation, Inc.
#
@@ -32,7 +32,7 @@ use Pod::Find qw(pod_where);
my @append_files;
my $force;
-my $verbose;
+my $verbose = 0;
my $changelog_file = 'ChangeLog';
my $since_date;
my $until_date;
@@ -606,6 +606,3 @@ EOT
close $fd;
}
-# Local Variables:
-# mode: perl
-# End:

Return to:

Send suggestions and report system problems to the System administrator.