diff options
Diffstat (limited to 'kernel/xpp/utils/zconf/Zaptel/Config/Gen/Unicall.pm')
-rw-r--r-- | kernel/xpp/utils/zconf/Zaptel/Config/Gen/Unicall.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/kernel/xpp/utils/zconf/Zaptel/Config/Gen/Unicall.pm b/kernel/xpp/utils/zconf/Zaptel/Config/Gen/Unicall.pm index 3e1048d..6d9552f 100644 --- a/kernel/xpp/utils/zconf/Zaptel/Config/Gen/Unicall.pm +++ b/kernel/xpp/utils/zconf/Zaptel/Config/Gen/Unicall.pm @@ -32,7 +32,9 @@ sub generate($) { print "Generating $file\n" if $genopts->{verbose}; open(F, ">$file") || die "$0: Failed to open $file: $!\n"; my $old = select F; - printf "; Autogenerated by %s on %s -- do not hand edit\n", $0, scalar(localtime); + printf "; Autogenerated by $0 on %s\n", scalar(localtime); + print "; If you edit this file and execute $0 again,\n"; + print "; your manual changes will be LOST.\n"; print "; This file should be #included in unicall.conf\n\n"; foreach my $span (@spans) { next unless $span->is_digital(); |