diff options
| -rw-r--r-- | versification/v11nsys.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/versification/v11nsys.pl b/versification/v11nsys.pl index 7a75461..a49ec71 100644 --- a/versification/v11nsys.pl +++ b/versification/v11nsys.pl @@ -15,6 +15,8 @@ $count = "last"; $aMode = "";
$warn = 1;
+($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
+
if (@ARGV[0] ne "") {
$n = 0;
while (@ARGV[$n] ne "") {
@@ -198,7 +200,7 @@ foreach $infile (@srcfiles) { open INF, $infile;
open OUTF, ">$outfile";
- print OUTF "/******************************************************************************\n * $outfile - Versification data for the $v11n system\n *\n * Copyright 2009 CrossWire Bible Society (http://www.crosswire.org)\n * CrossWire Bible Society\n * P. O. Box 2528\n * Tempe, AZ 85280-2528\n *\n * This program is free software; you can redistribute it and/or modify it\n * under the terms of the GNU General Public License as published by the\n * Free Software Foundation version 2.\n *\n * This program is distributed in the hope that it will be useful, but\n * WITHOUT ANY WARRANTY; without even the implied warranty of\n * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU\n * General Public License for more details.\n */\n";
+ print OUTF "/******************************************************************************\n * $outfile - Versification data for the $v11n system\n *\n * Copyright " . ($year+1900) . " CrossWire Bible Society (http://www.crosswire.org)\n * CrossWire Bible Society\n * P. O. Box 2528\n * Tempe, AZ 85280-2528\n *\n * This program is free software; you can redistribute it and/or modify it\n * under the terms of the GNU General Public License as published by the\n * Free Software Foundation version 2.\n *\n * This program is distributed in the hope that it will be useful, but\n * WITHOUT ANY WARRANTY; without even the implied warranty of\n * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU\n * General Public License for more details.\n */\n";
print OUTF "\n#ifndef CANON_" . uc($v11n) . "_H\n#define CANON_" . uc($v11n) . "_H\n\nSWORD_NAMESPACE_START\n\n\n";
$thisBook = "";
|