Move changelog near the end of the file
authorFlorian Weimer <fw@deneb.enyo.de>
Thu, 22 May 2008 14:04:54 +0000 (22 16:04 +0200)
committerFlorian Weimer <fw@deneb.enyo.de>
Thu, 22 May 2008 14:04:54 +0000 (22 16:04 +0200)
This means that the line numbers of the compiled Perl script do not
change.

dowkd.in

index 59c8f50..0ca0f74 100644 (file)
--- a/dowkd.in
+++ b/dowkd.in
@@ -82,10 +82,6 @@ use IO::Handle;
 
 my $db_version = '@DB_VERSION@';
 my $program_version = '@PROGRAM_VERSION@';
-my $changelog = <<'EOF';
-ChangeLog:
-@CHANGELOG@
-EOF
 
 my $db_file = 'dowkd.db';
 
@@ -541,7 +537,11 @@ if (@ARGV) {
        help;
        exit 0;
     } elsif ($cmd eq 'version') {
-       print "dowkd $program_version (database $db_version)\n\n$changelog";
+       print "dowkd $program_version (database $db_version)\n\n";
+       print <<'EOF';
+ChangeLog:
+@CHANGELOG@
+EOF
        exit 0;
     } else {
        die "error: invalid command, use \"help\" to get help\n";