diff options
author | Sergey Poznyakoff <gray@gnu.org> | 2019-10-13 08:18:38 +0300 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org> | 2019-10-13 08:18:38 +0300 |
commit | 19cdb79424d5580720444bf383a4c385f72d4052 (patch) | |
tree | df3d703f423f24f2988fa4cb282e96b1fa115dcd /mu-aux/gencl | |
parent | 3760d6d6e544fe1a76a4496c4ef1068bbcc855f7 (diff) | |
download | mailutils-19cdb79424d5580720444bf383a4c385f72d4052.tar.gz mailutils-19cdb79424d5580720444bf383a4c385f72d4052.tar.bz2 |
Minor fixes
Diffstat (limited to 'mu-aux/gencl')
-rwxr-xr-x | mu-aux/gencl | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/mu-aux/gencl b/mu-aux/gencl index 715b6bd0e..0419d81e0 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: |