[svn-commits] tzafrir: tools/trunk r6215 - /tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/

[SVN commits to the Digium repositories]

Author: tzafrir
Date: Sun Mar 22 05:31:09 2009
New Revision: 6215

URL: http://svn.digium.com/svn-view/dahdi?view=rev&rev=6215
Log:
dahdi-perl: "allow" hand-editing of generated files

Rework the text added by dahdi_genconf generators to say that you can
hand-edit files. But just don't complain if they get mysteriously
overriden when it is run again :-)

(closes issue #14569)
Reported by: jtodd

Modified:
    tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm
    tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/System.pm
    tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Unicall.pm
    tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Users.pm

Modified: tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm
URL: http://svn.digium.com/svn-view/dahdi/tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm?view=diff&rev=6215&r1=6214&r2=6215
==============================================================================
--- tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm (original)
+++ tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm Sun Mar 22 05:31:09 2009
@@ -140,7 +140,9 @@
 	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 <<"HEAD";
 ; Dahdi Channels Configurations (chan_dahdi.conf)
 ;

Modified: tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/System.pm
URL: http://svn.digium.com/svn-view/dahdi/tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/System.pm?view=diff&rev=6215&r1=6214&r2=6215
==============================================================================
--- tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/System.pm (original)
+++ tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/System.pm Sun Mar 22 05:31:09 2009
@@ -111,7 +111,9 @@
 	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 <<"HEAD";
 # Dahdi Configuration File
 #

Modified: tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Unicall.pm
URL: http://svn.digium.com/svn-view/dahdi/tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Unicall.pm?view=diff&rev=6215&r1=6214&r2=6215
==============================================================================
--- tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Unicall.pm (original)
+++ tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Unicall.pm Sun Mar 22 05:31:09 2009
@@ -32,7 +32,9 @@
 	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();

Modified: tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Users.pm
URL: http://svn.digium.com/svn-view/dahdi/tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Users.pm?view=diff&rev=6215&r1=6214&r2=6215
==============================================================================
--- tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Users.pm (original)
+++ tools/trunk/xpp/perl_modules/Dahdi/Config/Gen/Users.pm Sun Mar 22 05:31:09 2009
@@ -88,6 +88,8 @@
 ;! Filename: @{[basename($file)]} ($file)
 ;! Generator: $0
 ;! Creation Date: @{[scalar(localtime)]}
+;! If you edit this file and execute $0 again,\n";
+;! your manual changes will be LOST.\n";
 ;!
 [general]
 ;